home *** CD-ROM | disk | FTP | other *** search
Unknown | 1995-11-21 | 31.4 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 31 30 44 |@0000900|0,00010D|
|00000040| 35 43 00 41 5c 0d 01 00 | ac fd 00 00 5c 7d 00 00 |5C.A\...|....\}..|
|00000050| 0d 00 0a 19 20 f4 20 3e | 24 2e 21 4c 69 6e 6b 2e |.... . >|$.!Link.|
|00000060| 21 52 55 4e 49 4d 41 47 | 45 0d 00 14 15 20 c8 99 |!RUNIMAG|E.... ..|
|00000070| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 6e 22 0d 00 |"Hourgla|ss_On"..|
|00000080| 1e 1c 20 ee 20 85 20 a4 | 77 69 6d 70 65 72 72 6f |.. . . .|wimperro|
|00000090| 72 20 8b 20 f2 65 72 72 | 6f 72 0d 00 28 1d 20 f2 |r . .err|or..(. .|
|000000a0| 73 65 74 75 70 3a f2 72 | 65 61 64 5f 76 65 72 3a |setup:.r|ead_ver:|
|000000b0| f2 73 65 74 75 70 34 0d | 00 32 2e 20 ee 20 85 20 |.setup4.|.2. . . |
|000000c0| e7 20 a4 77 69 6d 70 65 | 72 72 6f 72 20 c8 97 20 |. .wimpe|rror .. |
|000000d0| ee 3a c8 98 20 8b 20 c8 | 97 20 ee 3a f2 65 72 72 |.:.. . .|. .:.err|
|000000e0| 6f 72 3a c8 98 0d 00 3c | 37 20 77 68 61 6e 64 6c |or:....<|7 whandl|
|000000f0| 65 31 25 3d a4 63 72 65 | 61 74 65 28 30 2c 30 2c |e1%=.cre|ate(0,0,|
|00000100| 73 63 72 65 65 6e 5f 72 | 2a 32 2c 73 63 72 65 65 |screen_r|*2,scree|
|00000110| 6e 5f 74 6f 70 2a 32 2c | 30 2c 30 29 0d 00 46 18 |n_top*2,|0,0)..F.|
|00000120| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 53 6d | .."Hour|glass_Sm|
|00000130| 61 73 68 22 0d 00 50 04 | 0d 00 5a 0e 20 63 6c 6f |ash"..P.|..Z. clo|
|00000140| 73 65 64 25 3d b9 0d 00 | 64 06 20 f5 0d 00 6e 21 |sed%=...|d. ...n!|
|00000150| 20 ee 20 85 20 c8 97 20 | ee 3a a4 77 69 6d 70 65 | . . .. |.:.wimpe|
|00000160| 72 72 6f 72 20 8b 20 f2 | 65 72 72 6f 72 0d 00 82 |rror . .|error...|
|00000170| 2f 20 20 e7 20 63 6c 6f | 73 65 64 25 20 f2 69 63 |/ . clo|sed% .ic|
|00000180| 6f 6e 62 61 72 77 61 69 | 74 3a e7 20 71 75 69 74 |onbarwai|t:. quit|
|00000190| 25 3d b9 20 f2 71 75 69 | 74 5f 69 74 0d 00 8c 19 |%=. .qui|t_it....|
|000001a0| 20 20 f2 66 69 6e 64 5f | 64 69 6d 65 6e 3a f2 72 | .find_|dimen:.r|
|000001b0| 65 67 62 6f 78 0d 00 96 | 1e 20 20 71 75 69 74 25 |egbox...|. quit%|
|000001c0| 3d a3 3a 63 6c 6f 73 65 | 64 25 3d a3 3a 65 6e 64 |=.:close|d%=.:end|
|000001d0| 25 3d a3 0d 00 a0 29 20 | 20 f2 6f 70 65 6e 77 69 |%=....) | .openwi|
|000001e0| 6e 64 6f 77 28 77 68 61 | 6e 64 6c 65 31 25 29 3a |ndow(wha|ndle1%):|
|000001f0| f2 72 65 61 64 70 61 6c | 28 2d 31 29 0d 00 aa 1d |.readpal|(-1)....|
|00000200| 20 20 f4 56 44 55 31 39 | 2c 31 2c 32 34 2c 32 32 | .VDU19|,1,24,22|
|00000210| 30 2c 32 32 30 2c 32 32 | 30 0d 00 b4 26 20 20 c8 |0,220,22|0...& .|
|00000220| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 2c 62 |. "Wimp_|Poll",,b|
|00000230| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|00000240| 00 be 12 20 20 c8 8e 20 | 72 65 61 73 6f 6e 25 20 |... .. |reason% |
|00000250| ca 0d 00 c8 13 20 20 20 | c9 20 31 20 3a f2 72 65 |..... |. 1 :.re|
|00000260| 64 72 61 77 0d 00 d2 27 | 20 20 20 c9 20 32 20 3a |draw...'| . 2 :|
|00000270| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00000280| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 00 dc 07 20 |ow",,blo|ck%.... |
|00000290| 20 cb 0d 00 e6 04 0d 00 | f0 08 20 20 20 f5 0d 00 | .......|.. ...|
|000002a0| fa 0d 20 20 20 20 f2 70 | 6f 6c 6c 0d 01 04 0d 20 |.. .p|oll.... |
|000002b0| 20 20 fd 20 65 6e 64 25 | 0d 01 0e 20 20 20 ef 31 | . end%|... .1|
|000002c0| 39 2c 31 2c 32 34 2c 70 | 62 6c 75 65 2c 70 67 72 |9,1,24,p|blue,pgr|
|000002d0| 65 65 6e 2c 70 72 65 64 | 0d 01 18 18 20 20 63 6c |een,pred|.... cl|
|000002e0| 6f 73 65 64 25 3d b9 3a | f2 73 68 75 74 5f 75 70 |osed%=.:|.shut_up|
|000002f0| 0d 01 22 0c 20 fd 20 71 | 75 69 74 25 0d 01 2c 10 |..". . q|uit%..,.|
|00000300| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 01 36 0e | .------|----..6.|
|00000310| 20 dd f2 71 75 69 74 5f | 69 74 0d 01 40 34 20 62 | ..quit_|it..@4 b|
|00000320| 6c 6f 63 6b 25 21 30 3d | 77 68 61 6e 64 6c 65 31 |lock%!0=|whandle1|
|00000330| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|00000340| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 01 |indow",,|block%..|
|00000350| 4a 13 20 24 62 6c 6f 63 | 6b 25 3d 22 54 41 53 4b |J. $bloc|k%="TASK|
|00000360| 22 0d 01 54 28 20 c8 99 | 22 57 69 6d 70 5f 43 6c |"..T( ..|"Wimp_Cl|
|00000370| 6f 73 65 44 6f 77 6e 22 | 2c 74 61 73 6b 25 2c 21 |oseDown"|,task%,!|
|00000380| 62 6c 6f 63 6b 25 3a c8 | 98 0d 01 5e 06 20 e1 0d |block%:.|...^. ..|
|00000390| 01 68 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.h. .---|-------.|
|000003a0| 01 72 0e 20 dd f2 73 68 | 75 74 5f 75 70 0d 01 7c |.r. ..sh|ut_up..||
|000003b0| 34 20 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |4 block%|!0=whand|
|000003c0| 6c 65 31 25 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |le1%:.."|Wimp_Clo|
|000003d0| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|000003e0| 25 0d 01 86 06 20 e1 0d | 01 90 10 20 f4 2d 2d 2d |%.... ..|... .---|
|000003f0| 2d 2d 2d 2d 2d 2d 2d 0d | 01 9a 12 20 dd f2 69 63 |-------.|... ..ic|
|00000400| 6f 6e 62 61 72 77 61 69 | 74 0d 01 a4 1d 20 65 6e |onbarwai|t.... en|
|00000410| 64 25 3d a3 3a 63 6c 6f | 73 65 64 25 3d a3 3a 71 |d%=.:clo|sed%=.:q|
|00000420| 75 69 74 25 3d a3 0d 01 | ae 06 20 f5 0d 01 b8 25 |uit%=...|.. ....%|
|00000430| 20 20 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c | .."Wim|p_Poll",|
|00000440| 2c 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e |,block% |. reason|
|00000450| 25 0d 01 c2 13 20 20 20 | c8 8e 20 72 65 61 73 6f |%.... |.. reaso|
|00000460| 6e 25 20 ca 0d 01 cc 14 | 20 20 20 20 c9 20 31 20 |n% .....| . 1 |
|00000470| 3a f2 72 65 64 72 61 77 | 0d 01 d6 28 20 20 20 20 |:.redraw|...( |
|00000480| c9 20 32 20 3a c8 99 22 | 57 69 6d 70 5f 4f 70 65 |. 2 :.."|Wimp_Ope|
|00000490| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|000004a0| 0d 01 e0 13 20 20 20 20 | c9 20 36 20 3a f2 6d 6f |.... |. 6 :.mo|
|000004b0| 75 73 65 0d 01 ea 2a 20 | 20 20 20 c9 20 38 20 3a |use...* | . 8 :|
|000004c0| c8 99 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |.."Wimp_|ProcessK|
|000004d0| 65 79 22 2c 62 6c 6f 63 | 6b 25 21 32 34 0d 01 f4 |ey",bloc|k%!24...|
|000004e0| 1c 20 20 20 20 c9 20 39 | 20 3a f2 69 63 6f 6e 62 |. . 9| :.iconb|
|000004f0| 61 72 6f 70 74 69 6f 6e | 73 0d 01 fe 08 20 20 20 |aroption|s.... |
|00000500| cb 0d 02 08 13 20 fd 20 | 65 6e 64 25 20 84 20 71 |..... . |end% . q|
|00000510| 75 69 74 25 0d 02 12 06 | 20 e1 0d 02 1c 11 20 f4 |uit%....| ..... .|
|00000520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 02 26 15 20 |--------|---..&. |
|00000530| dd f2 69 63 6f 6e 62 61 | 72 6f 70 74 69 6f 6e 73 |..iconba|roptions|
|00000540| 0d 02 30 14 20 63 68 6f | 69 63 65 25 3d 21 62 6c |..0. cho|ice%=!bl|
|00000550| 6f 63 6b 25 0d 02 3a 1f | 20 e7 20 63 68 6f 69 63 |ock%..:.| . choic|
|00000560| 65 25 3d 31 20 65 6e 64 | 25 3d b9 3a 71 75 69 74 |e%=1 end|%=.:quit|
|00000570| 25 3d b9 0d 02 44 06 20 | e1 0d 02 4e 10 20 f4 2d |%=...D. |...N. .-|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 02 58 0b 20 dd f2 |--------|-..X. ..|
|00000590| 70 6f 6c 6c 0d 02 62 26 | 20 c8 99 20 22 57 69 6d |poll..b&| .. "Wim|
|000005a0| 70 5f 50 6f 6c 6c 22 2c | 30 2c 62 6c 6f 63 6b 25 |p_Poll",|0,block%|
|000005b0| 20 b8 20 72 65 61 73 6f | 6e 25 0d 02 6c 38 20 c8 | . reaso|n%..l8 .|
|000005c0| 99 22 4f 53 5f 42 79 74 | 65 22 2c 31 33 35 20 b8 |."OS_Byt|e",135 .|
|000005d0| 20 2c 2c 52 32 3a e7 20 | 52 32 3c 3e 6f 6c 64 5f | ,,R2:. |R2<>old_|
|000005e0| 6d 6f 64 65 20 f2 6d 6f | 64 65 5f 63 68 61 6e 67 |mode .mo|de_chang|
|000005f0| 65 64 0d 02 76 11 20 c8 | 8e 20 72 65 61 73 6f 6e |ed..v. .|. reason|
|00000600| 25 20 ca 0d 02 80 11 20 | c9 20 31 20 3a f2 72 65 |% ..... |. 1 :.re|
|00000610| 64 72 61 77 0d 02 8a 25 | 20 c9 20 32 20 3a c8 99 |draw...%| . 2 :..|
|00000620| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00000630| 22 2c 2c 62 6c 6f 63 6b | 25 0d 02 94 15 20 c9 20 |",,block|%.... . |
|00000640| 36 20 3a f2 65 64 69 74 | 5f 6d 6f 75 73 65 0d 02 |6 :.edit|_mouse..|
|00000650| 9e 06 20 cb 0d 02 a8 28 | 20 e7 20 67 61 6d 65 5f |.. ....(| . game_|
|00000660| 72 75 6e 3d a3 20 f2 6d | 65 6e 75 73 63 72 65 65 |run=. .m|enuscree|
|00000670| 6e 3a 67 61 6d 65 5f 72 | 75 6e 3d a3 0d 02 b2 06 |n:game_r|un=.....|
|00000680| 20 e1 0d 02 bc 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00000690| 2d 2d 0d 02 c6 0c 20 dd | f2 6d 6f 75 73 65 0d 02 |--.... .|.mouse..|
|000006a0| d0 1b 20 78 25 3d 21 62 | 6c 6f 63 6b 25 3a 79 25 |.. x%=!b|lock%:y%|
|000006b0| 3d 62 6c 6f 63 6b 25 21 | 34 0d 02 da 5e 20 e7 20 |=block%!|4...^ . |
|000006c0| 62 6c 6f 63 6b 25 21 38 | 3d 32 20 80 20 62 6c 6f |block%!8|=2 . blo|
|000006d0| 63 6b 25 21 31 32 3d 2d | 32 20 f2 64 72 61 77 6d |ck%!12=-|2 .drawm|
|000006e0| 65 6e 75 28 6d 65 6e 75 | 25 2c 22 4c 69 6e 6b 2c |enu(menu|%,"Link,|
|000006f0| 49 6e 66 6f 72 6d 61 74 | 69 6f 6e 2c 51 75 69 74 |Informat|ion,Quit|
|00000700| 22 2c 78 25 2c 79 25 2c | b9 29 3a 4d 55 24 3d 22 |",x%,y%,|.):MU$="|
|00000710| 69 63 6f 6e 22 3a e1 0d | 02 e4 29 20 e7 20 62 6c |icon":..|..) . bl|
|00000720| 6f 63 6b 25 21 38 20 80 | 20 35 20 80 20 62 6c 6f |ock%!8 .| 5 . blo|
|00000730| 63 6b 25 21 31 32 3d 2d | 32 20 65 6e 64 25 3d b9 |ck%!12=-|2 end%=.|
|00000740| 0d 02 ee 06 20 e1 0d 02 | f8 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|00000750| 2d 2d 2d 2d 2d 2d 0d 03 | 02 21 20 dd f2 6f 72 69 |------..|.! ..ori|
|00000760| 67 69 6e 28 62 6c 6f 63 | 6b 25 2c f8 20 78 30 25 |gin(bloc|k%,. x0%|
|00000770| 2c f8 20 79 30 25 29 0d | 03 0c 33 20 78 30 25 3d |,. y0%).|..3 x0%=|
|00000780| 62 6c 6f 63 6b 25 21 34 | 2d 62 6c 6f 63 6b 25 21 |block%!4|-block%!|
|00000790| 32 30 3a 79 30 25 3d 62 | 6c 6f 63 6b 25 21 31 36 |20:y0%=b|lock%!16|
|000007a0| 2d 62 6c 6f 63 6b 25 21 | 32 34 0d 03 16 06 20 e1 |-block%!|24.... .|
|000007b0| 0d 03 20 11 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.. . .--|--------|
|000007c0| 2d 0d 03 2a 0d 20 dd f2 | 72 65 64 72 61 77 0d 03 |-..*. ..|redraw..|
|000007d0| 34 3b 20 77 69 6e 64 6f | 77 25 3d 62 6c 6f 63 6b |4; windo|w%=block|
|000007e0| 25 21 30 3a c8 99 22 57 | 69 6d 70 5f 52 65 64 72 |%!0:.."W|imp_Redr|
|000007f0| 61 77 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |awWindow|",,block|
|00000800| 25 20 b8 20 6d 6f 72 65 | 25 0d 03 52 0d 20 c8 95 |% . more|%..R. ..|
|00000810| 20 6d 6f 72 65 25 0d 03 | 5c 1d 20 20 f2 6f 72 69 | more%..|\. .ori|
|00000820| 67 69 6e 28 62 6c 6f 63 | 6b 25 2c 78 30 25 2c 79 |gin(bloc|k%,x0%,y|
|00000830| 30 25 29 0d 03 5d 41 20 | 20 67 78 30 25 3d 62 6c |0%)..]A | gx0%=bl|
|00000840| 6f 63 6b 25 21 32 38 3a | 67 79 30 25 3d 62 6c 6f |ock%!28:|gy0%=blo|
|00000850| 63 6b 25 21 33 32 3a 67 | 78 31 25 3d 62 6c 6f 63 |ck%!32:g|x1%=bloc|
|00000860| 6b 25 21 33 36 3a 67 79 | 31 25 3d 62 6c 6f 63 6b |k%!36:gy|1%=block|
|00000870| 25 21 34 30 0d 03 70 41 | 20 20 67 78 30 25 3d 28 |%!40..pA| gx0%=(|
|00000880| 67 78 30 25 2d 78 30 25 | 29 20 81 20 33 32 2a 28 |gx0%-x0%|) . 32*(|
|00000890| 33 32 2b 78 30 25 29 3a | 67 79 31 25 3d 28 67 79 |32+x0%):|gy1%=(gy|
|000008a0| 31 25 2d 79 30 25 29 20 | 81 20 33 32 2a 28 33 32 |1%-y0%) |. 32*(32|
|000008b0| 2b 79 30 25 29 0d 03 84 | 12 20 20 c8 8e 20 77 69 |+y0%)...|. .. wi|
|000008c0| 6e 64 6f 77 25 20 ca 0d | 03 8e 1c 20 20 20 c9 20 |ndow% ..|... . |
|000008d0| 77 68 61 6e 64 6c 65 31 | 25 3a f4 20 6e 6f 74 68 |whandle1|%:. noth|
|000008e0| 69 6e 67 0d 03 ac 07 20 | 20 cb 0d 03 b6 2b 20 20 |ing.... | ....+ |
|000008f0| c8 99 22 57 69 6d 70 5f | 47 65 74 52 65 63 74 61 |.."Wimp_|GetRecta|
|00000900| 6e 67 6c 65 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ngle",,b|lock% . |
|00000910| 6d 6f 72 65 25 0d 03 c0 | 06 20 ce 0d 03 ca 06 20 |more%...|. ..... |
|00000920| e1 0d 04 24 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...$. .-|--------|
|00000930| 2d 0d 04 2e 0f 20 dd a4 | 54 65 6d 70 28 54 24 29 |-.... ..|Temp(T$)|
|00000940| 0d 04 38 12 20 24 77 69 | 6e 5f 69 64 65 6e 25 3d |..8. $wi|n_iden%=|
|00000950| 54 24 0d 04 42 09 20 ea | 20 68 25 0d 04 4c 4b 20 |T$..B. .| h%..LK |
|00000960| c8 99 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |.."Wimp_|LoadTemp|
|00000970| 6c 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 2c 77 64 |late",,b|lock%,wd|
|00000980| 61 74 61 31 25 2c 77 64 | 31 65 6e 64 25 2c 2d 31 |ata1%,wd|1end%,-1|
|00000990| 2c 77 69 6e 5f 69 64 65 | 6e 25 20 b8 20 2c 2c 77 |,win_ide|n% . ,,w|
|000009a0| 64 61 74 61 31 25 0d 04 | 56 27 20 c8 99 22 57 69 |data1%..|V' .."Wi|
|000009b0| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|000009c0| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 68 25 0d 04 60 |,,block%| . h%..`|
|000009d0| 08 20 3d 68 25 0d 04 6a | 10 20 f4 2d 2d 2d 2d 2d |. =h%..j|. .-----|
|000009e0| 2d 2d 2d 2d 2d 0d 04 74 | 0c 20 dd f2 65 72 72 6f |-----..t|. ..erro|
|000009f0| 72 0d 04 7e 0e 20 21 62 | 6c 6f 63 6b 25 3d 9f 0d |r..~. !b|lock%=..|
|00000a00| 04 88 36 20 24 28 62 6c | 6f 63 6b 25 2b 34 29 3d |..6 $(bl|ock%+4)=|
|00000a10| f6 24 2b 22 20 28 69 6e | 74 65 72 6e 61 6c 20 65 |.$+" (in|ternal e|
|00000a20| 72 72 6f 72 20 63 6f 64 | 65 20 22 2b c3 9e 2b 22 |rror cod|e "+..+"|
|00000a30| 29 22 2b bd 30 0d 04 92 | 29 20 c8 99 22 57 69 6d |)"+.0...|) .."Wim|
|00000a40| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 62 |p_Report|Error",b|
|00000a50| 6c 6f 63 6b 25 2c 31 2c | 22 4c 69 6e 6b 22 0d 04 |lock%,1,|"Link"..|
|00000a60| 9c 06 20 e1 0d 04 a6 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00000a70| 2d 2d 2d 2d 0d 04 b0 10 | 20 dd a4 77 69 6d 70 65 |----....| ..wimpe|
|00000a80| 72 72 6f 72 0d 04 ba 0e | 20 21 62 6c 6f 63 6b 25 |rror....| !block%|
|00000a90| 3d 9f 0d 04 c4 2e 20 24 | 28 62 6c 6f 63 6b 25 2b |=..... $|(block%+|
|00000aa0| 34 29 3d f6 24 2b 22 20 | 28 22 2b c3 9f 2b 22 29 |4)=.$+" |("+..+")|
|00000ab0| 20 61 74 20 6c 69 6e 65 | 20 22 2b c3 9e 2b bd 30 | at line| "+..+.0|
|00000ac0| 0d 04 ce 41 20 c8 99 22 | 57 69 6d 70 5f 52 65 70 |...A .."|Wimp_Rep|
|00000ad0| 6f 72 74 45 72 72 6f 72 | 22 2c 62 6c 6f 63 6b 25 |ortError|",block%|
|00000ae0| 2c 31 2c 22 4c 69 6e 6b | 22 3a c8 99 22 57 69 6d |,1,"Link|":.."Wim|
|00000af0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 2d |p_Create|Menu",,-|
|00000b00| 31 0d 04 d8 34 20 62 6c | 6f 63 6b 25 21 30 3d 77 |1...4 bl|ock%!0=w|
|00000b10| 68 61 6e 64 6c 65 31 25 | 3a c8 99 22 57 69 6d 70 |handle1%|:.."Wimp|
|00000b20| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00000b30| 6c 6f 63 6b 25 0d 04 e2 | 07 20 3d b9 0d 04 ec 10 |lock%...|. =.....|
|00000b40| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 04 f6 40 | .------|----...@|
|00000b50| 20 dd a4 69 63 6f 6e 64 | 65 66 28 77 68 61 6e 64 | ..icond|ef(whand|
|00000b60| 6c 65 25 2c 69 78 25 2c | 69 79 25 2c 69 77 25 2c |le%,ix%,|iy%,iw%,|
|00000b70| 69 68 25 2c 66 6c 61 67 | 25 2c 74 65 78 74 24 2c |ih%,flag|%,text$,|
|00000b80| 64 31 25 2c 64 32 25 2c | 64 33 25 29 0d 05 00 30 |d1%,d2%,|d3%)...0|
|00000b90| 20 62 6c 6f 63 6b 25 21 | 30 3d 77 68 61 6e 64 6c | block%!|0=whandl|
|00000ba0| 65 25 3a 62 6c 6f 63 6b | 25 21 34 3d 69 78 25 3a |e%:block|%!4=ix%:|
|00000bb0| 62 6c 6f 63 6b 25 21 38 | 3d 69 79 25 0d 05 0a 38 |block%!8|=iy%...8|
|00000bc0| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 69 78 25 2b 69 | block%!|12=ix%+i|
|00000bd0| 77 25 3a 62 6c 6f 63 6b | 25 21 31 36 3d 69 79 25 |w%:block|%!16=iy%|
|00000be0| 2b 69 68 25 3a 62 6c 6f | 63 6b 25 21 32 30 3d 66 |+ih%:blo|ck%!20=f|
|00000bf0| 6c 61 67 25 0d 05 14 0e | 20 e7 20 64 31 25 3d 30 |lag%....| . d1%=0|
|00000c00| 20 8c 0d 05 1e 18 20 20 | 24 28 62 6c 6f 63 6b 25 | ..... |$(block%|
|00000c10| 2b 32 34 29 3d 74 65 78 | 74 24 0d 05 28 06 20 cc |+24)=tex|t$..(. .|
|00000c20| 0d 05 32 2f 20 20 62 6c | 6f 63 6b 25 21 32 34 3d |..2/ bl|ock%!24=|
|00000c30| 64 31 25 3a 62 6c 6f 63 | 6b 25 21 32 38 3d 64 32 |d1%:bloc|k%!28=d2|
|00000c40| 25 3a 62 6c 6f 63 6b 25 | 21 33 32 3d 64 33 25 0d |%:block%|!32=d3%.|
|00000c50| 05 3c 06 20 cd 0d 05 46 | 2b 20 c8 99 22 57 69 6d |.<. ...F|+ .."Wim|
|00000c60| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00000c70| 6c 6f 63 6b 25 20 b8 20 | 69 68 61 6e 64 6c 65 25 |lock% . |ihandle%|
|00000c80| 0d 05 50 0e 20 3d 69 68 | 61 6e 64 6c 65 25 0d 05 |..P. =ih|andle%..|
|00000c90| 5a 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 05 |Z. .----|------..|
|00000ca0| 64 15 20 dd f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |d. ..ope|nwindow(|
|00000cb0| 47 25 29 0d 05 6e 30 20 | 62 6c 6f 63 6b 25 21 30 |G%)..n0 |block%!0|
|00000cc0| 3d 47 25 3a c8 99 22 57 | 69 6d 70 5f 47 65 74 57 |=G%:.."W|imp_GetW|
|00000cd0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 62 6c 6f |indowSta|te",,blo|
|00000ce0| 63 6b 25 0d 05 78 20 20 | c8 99 22 57 69 6d 70 5f |ck%..x |.."Wimp_|
|00000cf0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|00000d00| 63 6b 25 0d 05 82 06 20 | e1 0d 05 8c 10 20 f4 2d |ck%.... |..... .-|
|00000d10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 05 96 2a 20 dd f2 |--------|-...* ..|
|00000d20| 64 72 61 77 6d 65 6e 75 | 28 6d 25 2c 6d 65 6e 75 |drawmenu|(m%,menu|
|00000d30| 24 2c 78 25 2c 79 25 2c | 6f 6e 69 63 6f 6e 62 61 |$,x%,y%,|oniconba|
|00000d40| 72 25 29 0d 05 a0 4a 20 | 6d 25 3f 31 32 3d 37 3a |r%)...J |m%?12=7:|
|00000d50| 6d 25 3f 31 33 3d 32 3a | 6d 25 3f 31 34 3d 37 3a |m%?13=2:|m%?14=7:|
|00000d60| 6d 25 3f 31 35 3d 30 3a | 6d 25 21 31 36 3d 32 30 |m%?15=0:|m%!16=20|
|00000d70| 30 3a 6d 25 21 32 30 3d | 34 34 3a 6d 25 21 32 34 |0:m%!20=|44:m%!24|
|00000d80| 3d 30 3a 70 74 72 25 3d | 6d 25 2b 32 38 0d 05 aa |=0:ptr%=|m%+28...|
|00000d90| 1e 20 24 6d 25 3d c0 6d | 65 6e 75 24 2c a7 6d 65 |. $m%=.m|enu$,.me|
|00000da0| 6e 75 24 2c 22 2c 22 29 | 2d 31 29 0d 05 b4 1a 20 |nu$,",")|-1).... |
|00000db0| 6d 65 6e 75 24 2b 3d 22 | 2c 22 3a 65 6e 74 72 69 |menu$+="|,":entri|
|00000dc0| 65 73 25 3d 30 0d 05 be | 11 20 c8 95 20 6d 65 6e |es%=0...|. .. men|
|00000dd0| 75 24 3c 3e 22 22 0d 05 | c8 20 20 6d 65 6e 75 24 |u$<>""..|. menu$|
|00000de0| 3d c1 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |=.menu$,|.menu$,"|
|00000df0| 2c 22 29 2b 31 29 0d 05 | d2 12 20 e7 20 6d 65 6e |,")+1)..|.. . men|
|00000e00| 75 24 3c 3e 22 22 20 8c | 0d 05 dc 27 20 70 74 72 |u$<>"" .|...' ptr|
|00000e10| 25 21 30 3d 30 3a 70 74 | 72 25 21 34 3d 2d 31 3a |%!0=0:pt|r%!4=-1:|
|00000e20| 70 74 72 25 21 38 3d 26 | 37 30 30 30 30 32 31 0d |ptr%!8=&|7000021.|
|00000e30| 05 e6 3a 20 24 28 70 74 | 72 25 2b 31 32 29 3d c0 |..: $(pt|r%+12)=.|
|00000e40| 6d 65 6e 75 24 2c a7 6d | 65 6e 75 24 2c 22 2c 22 |menu$,.m|enu$,","|
|00000e50| 29 2d 31 29 3a 70 74 72 | 25 2b 3d 32 34 3a 65 6e |)-1):ptr|%+=24:en|
|00000e60| 74 72 69 65 73 25 2b 3d | 31 0d 05 f0 06 20 cd 0d |tries%+=|1.... ..|
|00000e70| 05 fa 06 20 ce 0d 06 04 | 1c 20 70 74 72 25 21 2d |... ....|. ptr%!-|
|00000e80| 32 34 3d 70 74 72 25 21 | 2d 32 34 20 84 20 26 38 |24=ptr%!|-24 . &8|
|00000e90| 30 0d 06 0e 21 20 e7 20 | 6f 6e 69 63 6f 6e 62 61 |0...! . |oniconba|
|00000ea0| 72 25 20 6d 25 21 33 32 | 3d 77 68 61 6e 64 6c 65 |r% m%!32|=whandle|
|00000eb0| 36 25 0d 06 18 36 20 e7 | 20 6f 6e 69 63 6f 6e 62 |6%...6 .| oniconb|
|00000ec0| 61 72 25 20 8c 20 79 70 | 6f 73 25 3d 39 36 2b 65 |ar% . yp|os%=96+e|
|00000ed0| 6e 74 72 69 65 73 25 2a | 34 34 20 8b 20 79 70 6f |ntries%*|44 . ypo|
|00000ee0| 73 25 3d 79 25 2b 32 30 | 0d 06 22 29 20 c8 99 20 |s%=y%+20|..") .. |
|00000ef0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00000f00| 22 2c 2c 6d 25 2c 78 25 | 2d 36 34 2c 79 70 6f 73 |",,m%,x%|-64,ypos|
|00000f10| 25 0d 06 2c 06 20 e1 0d | 06 36 10 20 f4 2d 2d 2d |%..,. ..|.6. .---|
|00000f20| 2d 2d 2d 2d 2d 2d 2d 0d | 06 40 1f 20 dd f2 74 65 |-------.|.@. ..te|
|00000f30| 78 74 62 6f 78 28 66 78 | 25 2c 66 79 25 2c 77 64 |xtbox(fx|%,fy%,wd|
|00000f40| 25 2c 68 74 25 29 0d 06 | 4a 19 20 c8 99 22 57 69 |%,ht%)..|J. .."Wi|
|00000f50| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 30 0d |mp_SetCo|lour",0.|
|00000f60| 06 54 1c 20 ec 20 66 78 | 25 2c 66 79 25 3a df 20 |.T. . fx|%,fy%:. |
|00000f70| 66 78 25 2c 66 79 25 2b | 68 74 25 0d 06 5e 22 20 |fx%,fy%+|ht%..^" |
|00000f80| ec 20 66 78 25 2b 32 2c | 66 79 25 3a df 20 66 78 |. fx%+2,|fy%:. fx|
|00000f90| 25 2b 32 2c 66 79 25 2b | 68 74 25 2d 32 0d 06 68 |%+2,fy%+|ht%-2..h|
|00000fa0| 26 20 ec 20 66 78 25 2c | 66 79 25 2b 68 74 25 3a |& . fx%,|fy%+ht%:|
|00000fb0| df 20 66 78 25 2b 77 64 | 25 2d 32 2c 66 79 25 2b |. fx%+wd|%-2,fy%+|
|00000fc0| 68 74 25 0d 06 72 2a 20 | ec 20 66 78 25 2c 66 79 |ht%..r* |. fx%,fy|
|00000fd0| 25 2b 68 74 25 2d 32 3a | df 20 66 78 25 2b 77 64 |%+ht%-2:|. fx%+wd|
|00000fe0| 25 2d 34 2c 66 79 25 2b | 68 74 25 2d 32 0d 06 7c |%-4,fy%+|ht%-2..||
|00000ff0| 19 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |. .."Wim|p_SetCol|
|00001000| 6f 75 72 22 2c 34 0d 06 | 86 1c 20 ec 20 66 78 25 |our",4..|.. . fx%|
|00001010| 2c 66 79 25 3a df 20 66 | 78 25 2b 77 64 25 2c 66 |,fy%:. f|x%+wd%,f|
|00001020| 79 25 0d 06 90 22 20 ec | 20 66 78 25 2b 32 2c 66 |y%..." .| fx%+2,f|
|00001030| 79 25 2b 32 3a df 20 66 | 78 25 2b 77 64 25 2c 66 |y%+2:. f|x%+wd%,f|
|00001040| 79 25 2b 32 0d 06 9a 24 | 20 ec 20 66 78 25 2b 77 |y%+2...$| . fx%+w|
|00001050| 64 25 2c 66 79 25 3a df | 20 66 78 25 2b 77 64 25 |d%,fy%:.| fx%+wd%|
|00001060| 2c 66 79 25 2b 68 74 25 | 0d 06 a4 2a 20 ec 20 66 |,fy%+ht%|...* . f|
|00001070| 78 25 2b 77 64 25 2d 32 | 2c 66 79 25 3a df 20 66 |x%+wd%-2|,fy%:. f|
|00001080| 78 25 2b 77 64 25 2d 32 | 2c 66 79 25 2b 68 74 25 |x%+wd%-2|,fy%+ht%|
|00001090| 2d 32 0d 06 ae 06 20 e1 | 0d 06 b8 10 20 f4 2d 2d |-2.... .|.... .--|
|000010a0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 06 c2 23 20 dd f2 66 |--------|...# ..f|
|000010b0| 72 61 6d 65 28 66 78 25 | 2c 66 79 25 2c 77 64 25 |rame(fx%|,fy%,wd%|
|000010c0| 2c 68 74 25 2c 68 65 61 | 64 24 29 0d 06 cc 19 20 |,ht%,hea|d$).... |
|000010d0| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|000010e0| 72 22 2c 30 0d 06 d6 1c | 20 ec 20 66 78 25 2c 66 |r",0....| . fx%,f|
|000010f0| 79 25 3a df 20 66 78 25 | 2b 77 64 25 2c 66 79 25 |y%:. fx%|+wd%,fy%|
|00001100| 0d 06 e0 22 20 ec 20 66 | 78 25 2b 34 2c 66 79 25 |..." . f|x%+4,fy%|
|00001110| 2b 32 3a df 20 66 78 25 | 2b 77 64 25 2c 66 79 25 |+2:. fx%|+wd%,fy%|
|00001120| 2b 32 0d 06 ea 24 20 ec | 20 66 78 25 2b 77 64 25 |+2...$ .| fx%+wd%|
|00001130| 2c 66 79 25 3a df 20 66 | 78 25 2b 77 64 25 2c 66 |,fy%:. f|x%+wd%,f|
|00001140| 79 25 2b 68 74 25 0d 06 | f4 2a 20 ec 20 66 78 25 |y%+ht%..|.* . fx%|
|00001150| 2b 77 64 25 2d 32 2c 66 | 79 25 3a df 20 66 78 25 |+wd%-2,f|y%:. fx%|
|00001160| 2b 77 64 25 2d 32 2c 66 | 79 25 2b 68 74 25 2d 32 |+wd%-2,f|y%+ht%-2|
|00001170| 0d 06 fe 19 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |.... .."|Wimp_Set|
|00001180| 43 6f 6c 6f 75 72 22 2c | 34 0d 07 08 1c 20 ec 20 |Colour",|4.... . |
|00001190| 66 78 25 2c 66 79 25 3a | df 20 66 78 25 2c 66 79 |fx%,fy%:|. fx%,fy|
|000011a0| 25 2b 68 74 25 0d 07 12 | 22 20 ec 20 66 78 25 2b |%+ht%...|" . fx%+|
|000011b0| 32 2c 66 79 25 2b 32 3a | df 20 66 78 25 2b 32 2c |2,fy%+2:|. fx%+2,|
|000011c0| 66 79 25 2b 68 74 25 0d | 07 1c 26 20 ec 20 66 78 |fy%+ht%.|..& . fx|
|000011d0| 25 2c 66 79 25 2b 68 74 | 25 3a df 20 66 78 25 2b |%,fy%+ht|%:. fx%+|
|000011e0| 77 64 25 2d 32 2c 66 79 | 25 2b 68 74 25 0d 07 26 |wd%-2,fy|%+ht%..&|
|000011f0| 2a 20 ec 20 66 78 25 2c | 66 79 25 2b 68 74 25 2d |* . fx%,|fy%+ht%-|
|00001200| 32 3a df 20 66 78 25 2b | 77 64 25 2d 34 2c 66 79 |2:. fx%+|wd%-4,fy|
|00001210| 25 2b 68 74 25 2d 32 0d | 07 30 06 20 e1 0d 07 62 |%+ht%-2.|.0. ...b|
|00001220| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 07 6c |. .-----|-----..l|
|00001230| 21 20 dd a4 69 6e 74 65 | 72 73 65 63 74 28 78 30 |! ..inte|rsect(x0|
|00001240| 25 2c 79 30 25 2c 78 31 | 25 2c 79 31 25 29 0d 07 |%,y0%,x1|%,y1%)..|
|00001250| 76 1f 20 e7 20 78 31 25 | 3c 67 78 30 25 20 84 20 |v. . x1%|<gx0% . |
|00001260| 78 30 25 3e 67 78 31 25 | 20 8c 20 3d a3 0d 07 80 |x0%>gx1%| . =....|
|00001270| 1f 20 e7 20 79 31 25 3c | 67 79 30 25 20 84 20 79 |. . y1%<|gy0% . y|
|00001280| 30 25 3e 67 79 31 25 20 | 8c 20 3d a3 0d 07 8a 07 |0%>gy1% |. =.....|
|00001290| 20 3d b9 0d 07 94 10 20 | f4 2d 2d 2d 2d 2d 2d 2d | =..... |.-------|
|000012a0| 2d 2d 2d 0d 07 9e 28 20 | dd f2 70 69 63 74 75 72 |---...( |..pictur|
|000012b0| 65 28 58 53 49 5a 45 2c | 59 53 49 5a 45 2c 73 73 |e(XSIZE,|YSIZE,ss|
|000012c0| 73 70 61 63 65 2c 73 73 | 73 24 29 0d 07 a8 13 20 |space,ss|s$).... |
|000012d0| 24 73 70 72 6e 61 6d 65 | 25 3d 73 73 73 24 0d 07 |$sprname|%=sss$..|
|000012e0| b2 10 20 e7 20 73 73 73 | 24 3d 22 22 20 8c 0d 07 |.. . sss|$="" ...|
|000012f0| bc 37 20 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |.7 .."O|S_Sprite|
|00001300| 4f 70 22 2c 32 36 39 2c | 73 73 73 70 61 63 65 2c |Op",269,|ssspace,|
|00001310| 73 70 72 6e 61 6d 65 25 | 2c 31 33 2c 31 20 b8 20 |sprname%|,13,1 . |
|00001320| 2c 2c 2c 52 33 0d 07 c6 | 17 20 20 3f 28 73 70 72 |,,,R3...|. ?(spr|
|00001330| 6e 61 6d 65 25 2b 52 33 | 29 3d 31 33 0d 07 d0 06 |name%+R3|)=13....|
|00001340| 20 cd 0d 07 da 33 20 c8 | 99 22 4f 53 5f 53 70 72 | ....3 .|."OS_Spr|
|00001350| 69 74 65 4f 70 22 2c 32 | 38 30 2c 73 73 73 70 61 |iteOp",2|80,ssspa|
|00001360| 63 65 2c 24 73 70 72 6e | 61 6d 65 25 20 b8 20 2c |ce,$sprn|ame% . ,|
|00001370| 2c 61 64 64 25 0d 07 e4 | 3a 20 c8 99 22 4f 53 5f |,add%...|: .."OS_|
|00001380| 53 70 72 69 74 65 4f 70 | 22 2c 35 35 32 2c 73 73 |SpriteOp|",552,ss|
|00001390| 73 70 61 63 65 2c 61 64 | 64 25 20 b8 20 2c 2c 2c |space,ad|d% . ,,,|
|000013a0| 73 78 25 2c 73 79 25 2c | 2c 73 6d 6f 64 65 25 0d |sx%,sy%,|,smode%.|
|000013b0| 07 ee 16 20 65 25 3d 28 | 61 64 64 25 21 33 32 2d |... e%=(|add%!32-|
|000013c0| 34 34 29 2f 38 0d 07 f8 | 12 20 70 61 6c 25 3d 70 |44)/8...|. pal%=p|
|000013d0| 61 6c 62 75 66 66 25 0d | 08 02 0c 20 c8 8e 20 65 |albuff%.|... .. e|
|000013e0| 25 20 ca 0d 08 0c 08 20 | c9 20 30 0d 08 16 2d 20 |% ..... |. 0...- |
|000013f0| c8 99 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |.."OS_Re|adModeVa|
|00001400| 72 69 61 62 6c 65 22 2c | 73 6d 6f 64 65 25 2c 39 |riable",|smode%,9|
|00001410| 20 b8 20 2c 2c 70 70 25 | 0d 08 20 1b 20 70 61 6c | . ,,pp%|.. . pal|
|00001420| 25 3d a0 28 22 70 22 2b | c3 28 70 70 25 29 2b 22 |%=.("p"+|.(pp%)+"|
|00001430| 25 22 29 0d 08 2a 0d 20 | c9 20 32 2c 34 2c 31 36 |%")..*. |. 2,4,16|
|00001440| 0d 08 34 12 20 e3 20 69 | 25 3d 30 20 b8 20 65 25 |..4. . i|%=0 . e%|
|00001450| 2d 31 0d 08 3e 1f 20 70 | 61 6c 25 21 28 69 25 2a |-1..>. p|al%!(i%*|
|00001460| 34 29 3d 61 64 64 25 21 | 28 34 34 2b 69 25 2a 38 |4)=add%!|(44+i%*8|
|00001470| 29 0d 08 48 09 20 ed 20 | 69 25 0d 08 52 09 20 c9 |)..H. . |i%..R. .|
|00001480| 20 36 34 0d 08 5c 10 20 | e3 20 69 25 3d 30 20 b8 | 64..\. |. i%=0 .|
|00001490| 20 31 35 0d 08 66 20 20 | 70 61 6c 25 21 28 69 25 | 15..f |pal%!(i%|
|000014a0| 2a 34 29 3d 61 64 64 25 | 21 28 34 32 38 2b 69 25 |*4)=add%|!(428+i%|
|000014b0| 2a 38 29 0d 08 70 09 20 | ed 20 69 25 0d 08 7a 2a |*8)..p. |. i%..z*|
|000014c0| 20 7f 3a 20 85 20 31 2c | 22 43 61 6e 27 74 20 63 | .: . 1,|"Can't c|
|000014d0| 6f 70 65 20 77 69 74 68 | 20 74 68 69 73 20 73 70 |ope with| this sp|
|000014e0| 72 69 74 65 21 22 0d 08 | 84 06 20 cb 0d 08 8e 1a |rite!"..|.. .....|
|000014f0| 20 f4 49 46 20 73 6d 6f | 64 65 25 3d 2d 31 20 45 | .IF smo|de%=-1 E|
|00001500| 4e 44 50 52 4f 43 0d 08 | 98 3a 20 c8 99 22 43 6f |NDPROC..|.: .."Co|
|00001510| 6c 6f 75 72 54 72 61 6e | 73 5f 53 65 6c 65 63 74 |lourTran|s_Select|
|00001520| 54 61 62 6c 65 22 2c 73 | 6d 6f 64 65 25 2c 70 61 |Table",s|mode%,pa|
|00001530| 6c 25 2c 2d 31 2c 2d 31 | 2c 74 72 61 6e 73 32 25 |l%,-1,-1|,trans2%|
|00001540| 0d 08 a2 04 0d 08 ac 2e | 20 c8 99 22 4f 53 5f 52 |........| .."OS_R|
|00001550| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00001560| 2c 73 6d 6f 64 65 25 2c | 34 20 b8 20 2c 2c 78 6d |,smode%,|4 . ,,xm|
|00001570| 61 67 0d 08 b6 2e 20 c8 | 99 22 4f 53 5f 52 65 61 |ag.... .|."OS_Rea|
|00001580| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c 73 |dModeVar|iable",s|
|00001590| 6d 6f 64 65 25 2c 35 20 | b8 20 2c 2c 79 6d 61 67 |mode%,5 |. ,,ymag|
|000015a0| 0d 08 c0 24 20 73 78 25 | 3d 28 73 78 25 3c 3c 78 |...$ sx%|=(sx%<<x|
|000015b0| 6d 61 67 29 3a 73 79 25 | 3d 28 73 79 25 3c 3c 79 |mag):sy%|=(sy%<<y|
|000015c0| 6d 61 67 29 0d 08 ca 2b | 20 c8 99 22 4f 53 5f 52 |mag)...+| .."OS_R|
|000015d0| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|000015e0| 2c 2d 31 2c 35 20 b8 20 | 2c 2c 79 6d 61 67 32 0d |,-1,5 . |,,ymag2.|
|000015f0| 08 d4 2b 20 c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |..+ .."O|S_ReadMo|
|00001600| 64 65 56 61 72 69 61 62 | 6c 65 22 2c 2d 31 2c 34 |deVariab|le",-1,4|
|00001610| 20 b8 20 2c 2c 78 6d 61 | 67 32 0d 08 de 31 20 66 | . ,,xma|g2...1 f|
|00001620| 61 3d 28 32 5e 79 6d 61 | 67 32 29 2f 28 32 5e 79 |a=(2^yma|g2)/(2^y|
|00001630| 6d 61 67 29 3a 66 61 32 | 3d 28 32 5e 78 6d 61 67 |mag):fa2|=(2^xmag|
|00001640| 32 29 2f 28 32 5e 78 6d | 61 67 29 0d 08 e8 04 0d |2)/(2^xm|ag).....|
|00001650| 08 f2 26 20 72 61 74 69 | 6f 78 3d 58 53 49 5a 45 |..& rati|ox=XSIZE|
|00001660| 2f 73 78 25 3a 72 61 74 | 69 6f 79 3d 59 53 49 5a |/sx%:rat|ioy=YSIZ|
|00001670| 45 2f 73 79 25 0d 08 fc | 3e 20 e7 20 72 61 74 69 |E/sy%...|> . rati|
|00001680| 6f 78 3c 72 61 74 69 6f | 79 20 73 66 6e 25 3d 58 |ox<ratio|y sfn%=X|
|00001690| 53 49 5a 45 3a 73 66 64 | 25 3d 73 78 25 20 8b 20 |SIZE:sfd|%=sx% . |
|000016a0| 73 66 6e 25 3d 59 53 49 | 5a 45 3a 73 66 64 25 3d |sfn%=YSI|ZE:sfd%=|
|000016b0| 73 79 25 0d 09 06 3b 20 | 21 6d 61 67 25 3d 73 66 |sy%...; |!mag%=sf|
|000016c0| 6e 25 3a 6d 61 67 25 21 | 34 3d 73 66 6e 25 3a 6d |n%:mag%!|4=sfn%:m|
|000016d0| 61 67 25 21 38 3d 73 66 | 64 25 2a 66 61 32 3a 6d |ag%!8=sf|d%*fa2:m|
|000016e0| 61 67 25 21 31 32 3d 73 | 66 64 25 2a 66 61 0d 09 |ag%!12=s|fd%*fa..|
|000016f0| 10 2c 20 73 78 25 3d 73 | 78 25 2a 28 73 66 6e 25 |., sx%=s|x%*(sfn%|
|00001700| 2f 73 66 64 25 29 3a 73 | 79 25 3d 73 79 25 2a 28 |/sfd%):s|y%=sy%*(|
|00001710| 73 66 6e 25 2f 73 66 64 | 25 29 0d 09 1a 06 20 e1 |sfn%/sfd|%).... .|
|00001720| 0d 09 24 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..$. .--|--------|
|00001730| 0d 09 2e 0e 20 dd f2 70 | 61 6c 69 6e 69 74 0d 09 |.... ..p|alinit..|
|00001740| 38 1c 20 70 30 25 21 30 | 3d 26 66 66 66 66 66 66 |8. p0%!0|=&ffffff|
|00001750| 30 30 3a 70 30 25 21 34 | 3d 30 0d 09 42 3d 20 70 |00:p0%!4|=0..B= p|
|00001760| 31 25 21 30 3d 26 66 66 | 66 66 66 66 30 30 3a 70 |1%!0=&ff|ffff00:p|
|00001770| 31 25 21 34 3d 26 62 62 | 62 62 62 62 30 30 3a 70 |1%!4=&bb|bbbb00:p|
|00001780| 31 25 21 38 3d 26 37 37 | 37 37 37 37 30 30 3a 70 |1%!8=&77|777700:p|
|00001790| 31 25 21 31 32 3d 30 0d | 09 4c 45 20 70 32 25 21 |1%!12=0.|.LE p2%!|
|000017a0| 30 3d 26 66 66 66 66 66 | 66 30 30 3a 70 32 25 21 |0=&fffff|f00:p2%!|
|000017b0| 34 3d 26 64 64 64 64 64 | 64 30 30 3a 70 32 25 21 |4=&ddddd|d00:p2%!|
|000017c0| 38 3d 26 62 62 62 62 62 | 62 30 30 3a 70 32 25 21 |8=&bbbbb|b00:p2%!|
|000017d0| 31 32 3d 26 39 39 39 39 | 39 39 30 30 0d 09 56 40 |12=&9999|9900..V@|
|000017e0| 20 70 32 25 21 31 36 3d | 26 37 37 37 37 37 37 30 | p2%!16=|&7777770|
|000017f0| 30 3a 70 32 25 21 32 30 | 3d 26 35 35 35 35 35 35 |0:p2%!20|=&555555|
|00001800| 30 30 3a 70 32 25 21 32 | 34 3d 26 33 33 33 33 33 |00:p2%!2|4=&33333|
|00001810| 33 30 30 3a 70 32 25 21 | 32 38 3d 30 0d 09 60 48 |300:p2%!|28=0..`H|
|00001820| 20 70 32 25 21 33 32 3d | 26 39 39 34 34 30 30 30 | p2%!32=|&9944000|
|00001830| 30 3a 70 32 25 21 33 36 | 3d 26 30 30 65 65 65 65 |0:p2%!36|=&00eeee|
|00001840| 30 30 3a 70 32 25 21 34 | 30 3d 26 30 30 63 63 30 |00:p2%!4|0=&00cc0|
|00001850| 30 30 30 3a 70 32 25 21 | 34 34 3d 26 30 30 30 30 |000:p2%!|44=&0000|
|00001860| 64 64 30 30 0d 09 6a 48 | 20 70 32 25 21 34 38 3d |dd00..jH| p2%!48=|
|00001870| 26 62 62 65 65 65 65 30 | 30 3a 70 32 25 21 35 32 |&bbeeee0|0:p2%!52|
|00001880| 3d 26 30 30 38 38 35 35 | 30 30 3a 70 32 25 21 35 |=&008855|00:p2%!5|
|00001890| 36 3d 26 30 30 62 62 66 | 66 30 30 3a 70 32 25 21 |6=&00bbf|f00:p2%!|
|000018a0| 36 30 3d 26 66 66 62 62 | 30 30 30 30 0d 09 74 45 |60=&ffbb|0000..tE|
|000018b0| 20 70 33 25 21 30 3d 26 | 30 30 30 30 30 30 30 30 | p3%!0=&|00000000|
|000018c0| 3a 70 33 25 21 34 3d 26 | 31 30 31 30 31 30 30 30 |:p3%!4=&|10101000|
|000018d0| 3a 70 33 25 21 38 3d 26 | 32 30 32 30 32 30 30 30 |:p3%!8=&|20202000|
|000018e0| 3a 70 33 25 21 31 32 3d | 26 33 30 33 30 33 30 30 |:p3%!12=|&3030300|
|000018f0| 30 0d 09 7e 48 20 70 33 | 25 21 31 36 3d 26 30 30 |0..~H p3|%!16=&00|
|00001900| 30 30 34 30 30 30 3a 70 | 33 25 21 32 30 3d 26 31 |004000:p|3%!20=&1|
|00001910| 30 31 30 35 30 30 30 3a | 70 33 25 21 32 34 3d 26 |0105000:|p3%!24=&|
|00001920| 32 30 32 30 36 30 30 30 | 3a 70 33 25 21 32 38 3d |20206000|:p3%!28=|
|00001930| 26 33 30 33 30 37 30 30 | 30 0d 09 88 48 20 70 33 |&3030700|0...H p3|
|00001940| 25 21 33 32 3d 26 34 30 | 30 30 30 30 30 30 3a 70 |%!32=&40|000000:p|
|00001950| 33 25 21 33 36 3d 26 35 | 30 31 30 31 30 30 30 3a |3%!36=&5|0101000:|
|00001960| 70 33 25 21 34 30 3d 26 | 36 30 32 30 32 30 30 30 |p3%!40=&|60202000|
|00001970| 3a 70 33 25 21 34 34 3d | 26 37 30 33 30 33 30 30 |:p3%!44=|&7030300|
|00001980| 30 0d 09 92 48 20 70 33 | 25 21 34 38 3d 26 34 30 |0...H p3|%!48=&40|
|00001990| 30 30 34 30 30 30 3a 70 | 33 25 21 35 32 3d 26 35 |004000:p|3%!52=&5|
|000019a0| 30 31 30 35 30 30 30 3a | 70 33 25 21 35 36 3d 26 |0105000:|p3%!56=&|
|000019b0| 36 30 32 30 36 30 30 30 | 3a 70 33 25 21 36 30 3d |60206000|:p3%!60=|
|000019c0| 26 37 30 33 30 37 30 30 | 30 0d 09 9c 06 20 e1 0d |&7030700|0.... ..|
|000019d0| 09 a6 11 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |... .---|--------|
|000019e0| 0d 09 b0 0c 20 dd f2 73 | 65 74 75 70 0d 09 ba 26 |.... ..s|etup...&|
|000019f0| 20 de 20 61 72 65 61 25 | 20 32 35 36 2c 62 6c 6f | . area%| 256,blo|
|00001a00| 63 6b 25 20 33 30 30 30 | 2c 6d 65 6e 75 25 20 33 |ck% 3000|,menu% 3|
|00001a10| 30 30 0d 09 c4 28 20 de | 20 77 64 61 74 61 31 25 |00...( .| wdata1%|
|00001a20| 20 33 30 30 30 3a 77 64 | 31 65 6e 64 25 3d 77 64 | 3000:wd|1end%=wd|
|00001a30| 61 74 61 31 25 2b 33 30 | 30 30 0d 09 ce 38 20 de |ata1%+30|00...8 .|
|00001a40| 20 62 6c 20 35 31 32 2c | 67 72 69 64 28 35 2c 34 | bl 512,|grid(5,4|
|00001a50| 29 2c 74 6d 70 28 35 2c | 34 29 2c 41 72 28 32 36 |),tmp(5,|4),Ar(26|
|00001a60| 29 2c 41 72 32 28 32 36 | 29 2c 4c 65 74 28 35 2c |),Ar2(26|),Let(5,|
|00001a70| 34 29 0d 09 d8 3c 20 c8 | 99 22 4f 53 5f 52 65 61 |4)...< .|."OS_Rea|
|00001a80| 64 56 61 72 56 61 6c 22 | 2c 22 21 4c 69 6e 6b 31 |dVarVal"|,"!Link1|
|00001a90| 24 44 69 72 22 2c 61 72 | 65 61 25 2c 32 35 36 2c |$Dir",ar|ea%,256,|
|00001aa0| 30 2c 33 20 b8 20 2c 2c | 6c 65 6e 67 74 68 0d 09 |0,3 . ,,|length..|
|00001ab0| e2 21 20 61 72 65 61 25 | 3f 6c 65 6e 67 74 68 3d |.! area%|?length=|
|00001ac0| 31 33 3a 70 61 74 68 24 | 3d 24 61 72 65 61 25 0d |13:path$|=$area%.|
|00001ad0| 09 ec 2b 20 de 20 70 30 | 25 20 38 2c 70 31 25 20 |..+ . p0|% 8,p1% |
|00001ae0| 31 36 2c 70 32 25 20 36 | 34 2c 70 33 25 20 36 34 |16,p2% 6|4,p3% 64|
|00001af0| 3a 73 6d 6f 64 65 25 3d | 2d 31 0d 09 f6 31 20 de |:smode%=|-1...1 .|
|00001b00| 20 70 61 6c 62 75 66 66 | 25 20 36 34 2c 74 72 61 | palbuff|% 64,tra|
|00001b10| 6e 73 32 25 20 32 35 36 | 2c 74 6f 70 5f 70 24 28 |ns2% 256|,top_p$(|
|00001b20| 35 29 2c 74 6f 70 5f 73 | 28 35 29 0d 0a 00 2e 20 |5),top_s|(5).... |
|00001b30| de 20 74 72 61 6e 73 25 | 20 31 36 2c 72 65 63 74 |. trans%| 16,rect|
|00001b40| 25 20 31 36 2c 70 6c 6f | 74 61 74 25 20 38 2c 72 |% 16,plo|tat% 8,r|
|00001b50| 65 63 74 69 6e 25 20 31 | 36 0d 0a 0a 33 20 de 20 |ectin% 1|6...3 . |
|00001b60| 6d 61 67 25 20 31 36 2c | 73 70 72 6e 61 6d 65 25 |mag% 16,|sprname%|
|00001b70| 20 31 33 2c 69 63 6f 6e | 73 20 31 38 30 30 30 2c | 13,icon|s 18000,|
|00001b80| 77 69 6e 5f 69 64 65 6e | 25 20 31 31 0d 0a 14 21 |win_iden|% 11...!|
|00001b90| 20 24 62 6c 6f 63 6b 25 | 3d 22 54 41 53 4b 22 3a | $block%|="TASK":|
|00001ba0| 73 6f 75 6e 64 5f 6c 65 | 76 3d 2d 31 30 0d 0a 1e |sound_le|v=-10...|
|00001bb0| 3c 20 c8 99 22 57 69 6d | 70 5f 49 6e 69 74 69 61 |< .."Wim|p_Initia|
|00001bc0| 6c 69 73 65 22 2c 32 30 | 30 2c 21 62 6c 6f 63 6b |lise",20|0,!block|
|00001bd0| 25 2c 22 4c 69 6e 6b 22 | 20 b8 20 76 65 72 73 69 |%,"Link"| . versi|
|00001be0| 6f 6e 25 2c 74 61 73 6b | 25 0d 0a 28 36 20 69 62 |on%,task|%..(6 ib|
|00001bf0| 61 72 31 25 3d a4 69 63 | 6f 6e 64 65 66 28 2d 31 |ar1%=.ic|ondef(-1|
|00001c00| 2c 30 2c 30 2c 36 38 2c | 36 38 2c 26 33 30 30 32 |,0,0,68,|68,&3002|
|00001c10| 2c 22 21 4c 69 6e 6b 22 | 2c 30 2c 30 2c 30 29 0d |,"!Link"|,0,0,0).|
|00001c20| 0a 32 40 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |.2@ .."O|S_Sprite|
|00001c30| 4f 70 22 2c 32 36 35 2c | 69 63 6f 6e 73 3a 21 69 |Op",265,|icons:!i|
|00001c40| 63 6f 6e 73 3d 31 38 30 | 30 30 3a 69 63 6f 6e 73 |cons=180|00:icons|
|00001c50| 21 34 3d 30 3a 69 63 6f | 6e 73 21 38 3d 31 36 0d |!4=0:ico|ns!8=16.|
|00001c60| 0a 3c 2f 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |.</ .."O|S_Sprite|
|00001c70| 4f 70 22 2c 32 36 36 2c | 69 63 6f 6e 73 2c 28 70 |Op",266,|icons,(p|
|00001c80| 61 74 68 24 2b 22 2e 49 | 63 6f 6e 73 22 29 0d 0a |ath$+".I|cons")..|
|00001c90| 46 35 20 f2 70 61 6c 69 | 6e 69 74 3a 77 68 69 74 |F5 .pali|nit:whit|
|00001ca0| 65 5f 73 63 6f 72 65 25 | 3d 30 3a 62 6c 75 65 5f |e_score%|=0:blue_|
|00001cb0| 73 63 6f 72 65 25 3d 30 | 3a 67 61 6d 65 5f 72 75 |score%=0|:game_ru|
|00001cc0| 6e 3d a3 0d 0a 50 30 20 | c8 99 22 57 69 6d 70 5f |n=...P0 |.."Wimp_|
|00001cd0| 4f 70 65 6e 54 65 6d 70 | 6c 61 74 65 22 2c 2c 28 |OpenTemp|late",,(|
|00001ce0| 70 61 74 68 24 2b 22 2e | 54 65 6d 70 6c 61 74 65 |path$+".|Template|
|00001cf0| 73 22 29 0d 0a 5a 2e 20 | 77 68 61 6e 64 6c 65 36 |s")..Z. |whandle6|
|00001d00| 25 3d a4 54 65 6d 70 28 | 22 69 6e 66 6f 22 29 3a |%=.Temp(|"info"):|
|00001d10| 72 65 67 25 3d a4 54 65 | 6d 70 28 22 72 65 67 22 |reg%=.Te|mp("reg"|
|00001d20| 29 0d 0a 5f 1b 20 c8 99 | 22 57 69 6d 70 5f 43 6c |).._. ..|"Wimp_Cl|
|00001d30| 6f 73 65 54 65 6d 70 6c | 61 74 65 22 0d 0a 64 14 |oseTempl|ate"..d.|
|00001d40| 20 de 20 69 6e 25 20 31 | 36 2c 6f 75 25 20 31 36 | . in% 1|6,ou% 16|
|00001d50| 0d 0a 6e 3c 20 75 70 5f | 66 6c 61 67 3d 2d 31 3a |..n< up_|flag=-1:|
|00001d60| 69 6e 25 21 30 3d 31 32 | 3a 69 6e 25 21 34 3d 35 |in%!0=12|:in%!4=5|
|00001d70| 3a 69 6e 25 21 38 3d 31 | 31 3a 69 6e 25 21 31 32 |:in%!8=1|1:in%!12|
|00001d80| 3d 34 3a 69 6e 25 21 31 | 36 3d 2d 31 0d 0a 78 1e |=4:in%!1|6=-1..x.|
|00001d90| 20 f2 66 69 6e 64 5f 64 | 69 6d 65 6e 3a 74 6f 74 | .find_d|imen:tot|
|00001da0| 61 6c 5f 67 61 6d 65 73 | 3d 30 0d 0a 82 09 20 c8 |al_games|=0.... .|
|00001db0| a0 20 32 0d 0a 8c 16 20 | 2a 43 48 41 4e 4e 45 4c |. 2.... |*CHANNEL|
|00001dc0| 56 4f 49 43 45 20 32 20 | 39 0d 0a aa 1e 20 71 5f |VOICE 2 |9.... q_|
|00001dd0| 6f 6c 64 24 3d 22 22 3a | 77 70 6c 24 3d 22 22 3a |old$="":|wpl$="":|
|00001de0| 62 70 6c 24 3d 22 22 0d | 0a b4 2e 20 77 68 69 74 |bpl$="".|... whit|
|00001df0| 65 25 3d a3 3a 62 6c 75 | 65 25 3d a3 3a 77 68 69 |e%=.:blu|e%=.:whi|
|00001e00| 74 65 5f 77 6f 6e 25 3d | a3 3a 62 6c 75 65 5f 77 |te_won%=|.:blue_w|
|00001e10| 6f 6e 25 3d a3 0d 0a be | 2f 20 77 68 5f 67 61 6d |on%=....|/ wh_gam|
|00001e20| 65 73 3d 30 3a 62 6c 5f | 67 61 6d 65 73 3d 30 3a |es=0:bl_|games=0:|
|00001e30| 73 6b 6c 3d 31 3a 73 6b | 6c 32 3d 31 3a 73 6b 6d |skl=1:sk|l2=1:skm|
|00001e40| 69 6e 3d 31 0d 0a c8 06 | 20 e1 0d 0a d2 10 20 f4 |in=1....| ..... .|
|00001e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0a dc 11 20 dd |--------|--.... .|
|00001e60| f2 66 69 6e 64 5f 64 69 | 6d 65 6e 0d 0a e6 24 20 |.find_di|men...$ |
|00001e70| c8 99 22 4f 53 5f 52 65 | 61 64 56 64 75 56 61 72 |.."OS_Re|adVduVar|
|00001e80| 69 61 62 6c 65 73 22 2c | 69 6e 25 2c 6f 75 25 0d |iables",|in%,ou%.|
|00001e90| 0a f0 3f 20 70 69 78 3d | 28 6f 75 25 21 30 29 2b |..? pix=|(ou%!0)+|
|00001ea0| 31 3a 70 69 78 3d 28 32 | 5e 6f 75 25 21 34 29 2a |1:pix=(2|^ou%!4)*|
|00001eb0| 70 69 78 3a f4 20 77 68 | 65 72 65 20 69 73 20 74 |pix:. wh|ere is t|
|00001ec0| 6f 70 20 6f 66 20 73 63 | 72 65 65 6e 3f 3f 0d 0a |op of sc|reen??..|
|00001ed0| fa 1f 20 73 63 72 65 65 | 6e 5f 74 6f 70 3d 70 69 |.. scree|n_top=pi|
|00001ee0| 78 3a 73 6b 6c 3d 70 69 | 78 2f 39 36 30 0d 0b 04 |x:skl=pi|x/960...|
|00001ef0| 33 20 70 69 78 3d 28 6f | 75 25 21 38 29 2b 31 3a |3 pix=(o|u%!8)+1:|
|00001f00| 70 69 78 3d 28 32 5e 6f | 75 25 21 31 32 29 2a 70 |pix=(2^o|u%!12)*p|
|00001f10| 69 78 3a f4 20 72 69 67 | 68 74 20 65 64 67 65 3f |ix:. rig|ht edge?|
|00001f20| 0d 0b 0e 24 20 73 63 72 | 65 65 6e 5f 72 3d 70 69 |...$ scr|een_r=pi|
|00001f30| 78 3a 73 6b 6c 32 3d 73 | 63 72 65 65 6e 5f 72 2f |x:skl2=s|creen_r/|
|00001f40| 31 32 38 30 0d 0b 18 21 | 20 c8 99 22 4f 53 5f 42 |1280...!| .."OS_B|
|00001f50| 79 74 65 22 2c 31 33 35 | 20 b8 20 2c 2c 6f 6c 64 |yte",135| . ,,old|
|00001f60| 5f 6d 6f 64 65 0d 0b 22 | 06 20 e1 0d 0b 2c 10 20 |_mode.."|. ...,. |
|00001f70| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0b 36 2e 20 |.-------|---..6. |
|00001f80| dd a4 63 72 65 61 74 65 | 28 76 77 78 25 2c 76 77 |..create|(vwx%,vw|
|00001f90| 79 25 2c 76 77 77 25 2c | 76 77 68 25 2c 65 78 74 |y%,vww%,|vwh%,ext|
|00001fa0| 78 25 2c 65 78 74 79 25 | 29 0d 0b 40 11 20 24 62 |x%,exty%|)..@. $b|
|00001fb0| 6c 3d c4 32 35 35 2c bd | 30 29 0d 0b 4a 37 20 62 |l=.255,.|0)..J7 b|
|00001fc0| 6c 21 30 3d 76 77 78 25 | 3a 62 6c 21 34 3d 76 77 |l!0=vwx%|:bl!4=vw|
|00001fd0| 79 25 3a 62 6c 21 38 3d | 76 77 78 25 2b 76 77 77 |y%:bl!8=|vwx%+vww|
|00001fe0| 25 3a 62 6c 21 31 32 3d | 76 77 79 25 2b 76 77 68 |%:bl!12=|vwy%+vwh|
|00001ff0| 25 0d 0b 54 35 20 62 6c | 21 32 34 3d 2d 31 3a 62 |%..T5 bl|!24=-1:b|
|00002000| 6c 21 32 38 3d 26 38 30 | 30 30 31 30 34 30 3a 62 |l!28=&80|001040:b|
|00002010| 6c 3f 33 32 3d 37 3a 62 | 6c 3f 33 33 3d 32 3a 62 |l?32=7:b|l?33=2:b|
|00002020| 6c 3f 33 34 3d 37 0d 0b | 5e 1a 20 62 6c 3f 33 35 |l?34=7..|^. bl?35|
|00002030| 3d 32 3a f4 20 62 61 63 | 6b 20 63 6f 6c 6f 75 72 |=2:. bac|k colour|
|00002040| 0d 0b 68 1d 20 62 6c 3f | 33 36 3d 33 3a 62 6c 3f |..h. bl?|36=3:bl?|
|00002050| 33 37 3d 31 3a 62 6c 3f | 33 38 3d 31 32 0d 0b 72 |37=1:bl?|38=12..r|
|00002060| 2f 20 62 6c 21 34 30 3d | 30 3a 62 6c 21 34 34 3d |/ bl!40=|0:bl!44=|
|00002070| 2d 76 77 68 25 2d 65 78 | 74 79 25 3a 62 6c 21 34 |-vwh%-ex|ty%:bl!4|
|00002080| 38 3d 76 77 77 25 2b 65 | 78 74 78 25 0d 0b 7c 22 |8=vww%+e|xtx%..|"|
|00002090| 20 62 6c 21 35 32 3d 30 | 3a 62 6c 21 35 36 3d 26 | bl!52=0|:bl!56=&|
|000020a0| 33 44 3a 62 6c 21 36 30 | 3d 33 3c 3c 31 32 0d 0b |3D:bl!60|=3<<12..|
|000020b0| 86 39 20 24 28 62 6c 2b | 37 32 29 3d 22 4c 69 6e |.9 $(bl+|72)="Lin|
|000020c0| 6b 4d 22 3a c8 99 22 57 | 69 6d 70 5f 43 72 65 61 |kM":.."W|imp_Crea|
|000020d0| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 20 b8 20 |teWindow|",,bl . |
|000020e0| 68 61 6e 64 6c 65 25 0d | 0b 9a 0d 20 3d 68 61 6e |handle%.|... =han|
|000020f0| 64 6c 65 25 0d 0b a4 10 | 20 f4 2d 2d 2d 2d 2d 2d |dle%....| .------|
|00002100| 2d 2d 2d 2d 0d 0b ae 0f | 20 dd a4 54 65 6d 70 28 |----....| ..Temp(|
|00002110| 54 24 29 0d 0b b8 17 20 | 24 77 69 6e 5f 69 64 65 |T$).... |$win_ide|
|00002120| 6e 25 3d 54 24 3a ea 20 | 68 25 0d 0b c2 4b 20 c8 |n%=T$:. |h%...K .|
|00002130| 99 22 57 69 6d 70 5f 4c | 6f 61 64 54 65 6d 70 6c |."Wimp_L|oadTempl|
|00002140| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 2c 77 64 61 |ate",,bl|ock%,wda|
|00002150| 74 61 31 25 2c 77 64 31 | 65 6e 64 25 2c 2d 31 2c |ta1%,wd1|end%,-1,|
|00002160| 77 69 6e 5f 69 64 65 6e | 25 20 b8 20 2c 2c 77 64 |win_iden|% . ,,wd|
|00002170| 61 74 61 31 25 0d 0b cc | 27 20 c8 99 22 57 69 6d |ata1%...|' .."Wim|
|00002180| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00002190| 2c 62 6c 6f 63 6b 25 20 | b8 20 68 25 0d 0b d6 08 |,block% |. h%....|
|000021a0| 20 3d 68 25 0d 0b e0 10 | 20 f4 2d 2d 2d 2d 2d 2d | =h%....| .------|
|000021b0| 2d 2d 2d 2d 0d 0b ea 21 | 20 dd f2 6d 6f 64 65 5f |----...!| ..mode_|
|000021c0| 63 68 61 6e 67 65 64 3a | f2 66 69 6e 64 5f 64 69 |changed:|.find_di|
|000021d0| 6d 65 6e 3a e1 0d 0b f4 | 10 20 f4 2d 2d 2d 2d 2d |men:....|. .-----|
|000021e0| 2d 2d 2d 2d 2d 0d 0b fe | 0f 20 dd f2 72 65 61 64 |-----...|. ..read|
|000021f0| 5f 76 65 72 0d 0c 08 14 | 20 2a 53 65 74 20 52 69 |_ver....| *Set Ri|
|00002200| 73 63 24 56 65 72 20 33 | 0d 0c 12 34 20 ff 28 22 |sc$Ver 3|...4 .("|
|00002210| 52 4d 45 6e 73 75 72 65 | 20 55 74 69 6c 69 74 79 |RMEnsure| Utility|
|00002220| 4d 6f 64 75 6c 65 20 33 | 2e 30 30 20 53 65 74 20 |Module 3|.00 Set |
|00002230| 52 69 73 63 24 56 65 72 | 20 32 22 29 0d 0c 1c 39 |Risc$Ver| 2")...9|
|00002240| 20 c8 99 22 58 4f 53 5f | 52 65 61 64 56 61 72 56 | .."XOS_|ReadVarV|
|00002250| 61 6c 22 2c 22 52 69 73 | 63 24 56 65 72 22 2c 62 |al","Ris|c$Ver",b|
|00002260| 6c 6f 63 6b 25 2c 32 35 | 36 2c 30 2c 30 20 b8 20 |lock%,25|6,0,0 . |
|00002270| 2c 2c 6c 65 6e 0d 0c 26 | 20 20 62 6c 6f 63 6b 25 |,,len..&| block%|
|00002280| 3f 6c 65 6e 3d 31 33 3a | 72 69 73 63 24 3d 24 62 |?len=13:|risc$=$b|
|00002290| 6c 6f 63 6b 25 0d 0c 30 | 14 20 2a 55 6e 53 65 74 |lock%..0|. *UnSet|
|000022a0| 20 52 69 73 63 24 56 65 | 72 0d 0c 3a 2d 20 c8 99 | Risc$Ve|r..:- ..|
|000022b0| 22 46 6f 6e 74 5f 52 65 | 61 64 46 6f 6e 74 4d 61 |"Font_Re|adFontMa|
|000022c0| 78 22 20 b8 20 52 30 2c | 52 31 2c 52 32 2c 52 33 |x" . R0,|R1,R2,R3|
|000022d0| 2c 52 34 2c 52 35 0d 0c | 44 40 20 e7 20 72 69 73 |,R4,R5..|D@ . ris|
|000022e0| 63 24 3c 22 33 22 20 c8 | 99 22 46 6f 6e 74 5f 53 |c$<"3" .|."Font_S|
|000022f0| 65 74 46 6f 6e 74 4d 61 | 78 22 2c 52 30 2c 52 31 |etFontMa|x",R0,R1|
|00002300| 2c 31 34 31 31 32 30 2c | 31 34 31 31 32 30 2c 30 |,141120,|141120,0|
|00002310| 2c 30 2c 30 2c 30 0d 0c | 4e 06 20 e1 0d 0c 58 10 |,0,0,0..|N. ...X.|
|00002320| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0c 62 0b | .------|----..b.|
|00002330| 20 dd f2 67 72 69 64 0d | 0c 6c 33 20 70 3d 73 63 | ..grid.|.l3 p=sc|
|00002340| 72 65 65 6e 5f 72 2f 32 | 3a 73 6b 6d 69 6e 3d 73 |reen_r/2|:skmin=s|
|00002350| 6b 6c 3a e7 20 73 6b 6c | 32 3c 73 6b 6d 69 6e 20 |kl:. skl|2<skmin |
|00002360| 73 6b 6d 69 6e 3d 73 6b | 6c 32 0d 0c 76 53 20 c8 |skmin=sk|l2..vS .|
|00002370| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00002380| 22 2c 37 3a 71 3d 31 3a | 71 72 3d 31 3a 61 3d 30 |",7:q=1:|qr=1:a=0|
|00002390| 3a 78 31 3d 70 2d 28 35 | 38 38 2a 73 6b 6c 32 29 |:x1=p-(5|88*skl2)|
|000023a0| 3a 79 31 3d 36 34 2a 73 | 6b 6c 3a 73 3d 36 32 2a |:y1=64*s|kl:s=62*|
|000023b0| 73 6b 6d 69 6e 3a f2 68 | 65 78 28 31 29 0d 0c 80 |skmin:.h|ex(1)...|
|000023c0| 3e 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |> .."Wim|p_SetCol|
|000023d0| 6f 75 72 22 2c 30 3a 61 | 25 3d b0 78 31 2b 34 2c |our",0:a|%=.x1+4,|
|000023e0| 79 31 2b 34 29 3a e6 20 | 31 32 38 2b 61 25 3a c8 |y1+4):. |128+a%:.|
|000023f0| 90 20 78 31 2b 34 2c 79 | 31 2b 38 0d 0c 8a 54 20 |. x1+4,y|1+8...T |
|00002400| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00002410| 72 22 2c 37 3a 61 3d 30 | 3a 78 31 3d 70 2b 28 35 |r",7:a=0|:x1=p+(5|
|00002420| 38 38 2a 73 6b 6c 32 29 | 2d 28 73 2a 73 6b 6c 29 |88*skl2)|-(s*skl)|
|00002430| 2b 34 3a 79 31 3d 36 34 | 2a 73 6b 6c 3a 73 3d 36 |+4:y1=64|*skl:s=6|
|00002440| 32 2a 73 6b 6d 69 6e 3a | f2 68 65 78 28 31 29 0d |2*skmin:|.hex(1).|
|00002450| 0c 94 3f 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |..? .."W|imp_SetC|
|00002460| 6f 6c 6f 75 72 22 2c 31 | 35 3a 61 25 3d b0 78 31 |olour",1|5:a%=.x1|
|00002470| 2b 34 2c 79 31 2b 34 29 | 3a e6 20 31 32 38 2b 61 |+4,y1+4)|:. 128+a|
|00002480| 25 3a c8 90 20 78 31 2b | 34 2c 79 31 2b 38 0d 0c |%:.. x1+|4,y1+8..|
|00002490| 9e 19 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 6f |.. .."Wi|mp_SetCo|
|000024a0| 6c 6f 75 72 22 2c 37 0d | 0c a8 21 20 73 3d 39 32 |lour",7.|..! s=92|
|000024b0| 2a 73 6b 6c 3a 71 72 3d | 28 31 32 38 2e 38 2a 73 |*skl:qr=|(128.8*s|
|000024c0| 6b 6c 32 29 2f 28 73 29 | 0d 0c b2 3c 20 79 73 74 |kl2)/(s)|...< yst|
|000024d0| 3d 73 63 72 65 65 6e 5f | 74 6f 70 2d 28 38 2a 73 |=screen_|top-(8*s|
|000024e0| 29 2d 31 36 3a 78 73 74 | 3d 28 73 63 72 65 65 6e |)-16:xst|=(screen|
|000024f0| 5f 72 2f 32 29 2d 28 35 | 2a 73 2a 71 72 2f 32 29 |_r/2)-(5|*s*qr/2)|
|00002500| 2d 28 73 29 0d 0c bc 47 | 20 f4 50 52 4f 43 70 6c |-(s)...G| .PROCpl|
|00002510| 69 6e 62 6f 78 28 78 73 | 74 2d 28 73 2f 32 29 2d |inbox(xs|t-(s/2)-|
|00002520| 31 32 2d 34 2c 79 73 74 | 2d 31 32 2d 34 2c 28 35 |12-4,yst|-12-4,(5|
|00002530| 2a 73 2a 71 72 29 2b 28 | 33 2a 73 29 2b 32 34 2b |*s*qr)+(|3*s)+24+|
|00002540| 38 2c 38 2a 73 2b 31 32 | 2b 36 29 0d 0c be 44 20 |8,8*s+12|+6)...D |
|00002550| f2 74 65 78 74 62 6f 78 | 32 28 78 73 74 2d 28 73 |.textbox|2(xst-(s|
|00002560| 2f 32 29 2d 31 32 2d 34 | 2c 79 73 74 2d 31 32 2d |/2)-12-4|,yst-12-|
|00002570| 34 2c 28 35 2a 73 2a 71 | 72 29 2b 28 33 2a 73 29 |4,(5*s*q|r)+(3*s)|
|00002580| 2b 32 34 2b 38 2c 38 2a | 73 2b 31 32 2b 36 29 0d |+24+8,8*|s+12+6).|
|00002590| 0c c6 50 20 ef 32 34 2c | 78 73 74 2d 28 73 2f 32 |..P .24,|xst-(s/2|
|000025a0| 29 2d 31 32 3b 79 73 74 | 2d 31 32 3b 28 78 73 74 |)-12;yst|-12;(xst|
|000025b0| 2d 28 73 2f 32 29 2d 31 | 32 29 2b 28 35 2a 73 2a |-(s/2)-1|2)+(5*s*|
|000025c0| 71 72 29 2b 28 33 2a 73 | 29 2b 32 34 3b 28 79 73 |qr)+(3*s|)+24;(ys|
|000025d0| 74 2d 31 32 29 2b 28 38 | 2a 73 2b 31 30 29 3b 0d |t-12)+(8|*s+10);.|
|000025e0| 0c d0 04 0d 0c da 2c 20 | 61 3d 30 3a 78 31 3d 78 |......, |a=0:x1=x|
|000025f0| 73 74 3a 79 31 3d 79 73 | 74 2d 28 30 2e 38 36 36 |st:y1=ys|t-(0.866|
|00002600| 2a 28 32 2a 73 29 29 3a | f2 68 65 78 28 31 29 0d |*(2*s)):|.hex(1).|
|00002610| 0c e4 0e 20 e3 20 47 3d | 31 20 b8 20 35 0d 0c ee |... . G=|1 . 5...|
|00002620| 0a 20 20 61 6e 3d 30 0d | 0c f8 33 20 20 e3 20 46 |. an=0.|..3 . F|
|00002630| 3d 31 20 b8 20 33 3a 78 | 31 3d 78 73 74 3a 79 31 |=1 . 3:x|1=xst:y1|
|00002640| 3d 79 31 2b 73 2a b5 28 | 61 6e 29 3a 61 6e 2b 3d |=y1+s*.(|an):an+=|
|00002650| 36 30 2a af 2f 31 38 30 | 3a ed 0d 0d 02 11 20 20 |60*./180|:..... |
|00002660| 61 3d 30 3a f2 68 65 78 | 28 31 29 0d 0d 0c 06 20 |a=0:.hex|(1).... |
|00002670| ed 0d 0d 16 04 0d 0d 20 | 37 20 79 31 3d 79 73 74 |....... |7 y1=yst|
|00002680| 2d 28 30 2e 38 36 36 2a | 28 32 2a 73 29 29 3a 78 |-(0.866*|(2*s)):x|
|00002690| 31 3d 78 73 74 2b 28 32 | 2a 73 2a 71 72 29 2b 73 |1=xst+(2|*s*qr)+s|
|000026a0| 3a 61 3d 30 3a f2 68 65 | 78 28 31 29 0d 0d 2a 0e |:a=0:.he|x(1)..*.|
|000026b0| 20 e3 20 47 3d 31 20 b8 | 20 35 0d 0d 34 0a 20 20 | . G=1 .| 5..4. |
|000026c0| 61 6e 3d 30 0d 0d 35 2d | 20 20 20 e3 20 46 3d 31 |an=0..5-| . F=1|
|000026d0| 20 b8 20 33 3a 79 31 3d | 79 31 2b 73 2a b5 28 61 | . 3:y1=|y1+s*.(a|
|000026e0| 6e 29 3a 61 6e 2b 3d 36 | 30 2a af 2f 31 38 30 3a |n):an+=6|0*./180:|
|000026f0| ed 0d 0d 3e 11 20 20 61 | 3d 30 3a f2 68 65 78 28 |...>. a|=0:.hex(|
|00002700| 31 29 0d 0d 48 06 20 ed | 0d 0d 52 04 0d 0d 5c 3b |1)..H. .|..R...\;|
|00002710| 20 79 31 3d 79 73 74 2d | 28 30 2e 38 36 36 2a 28 | y1=yst-|(0.866*(|
|00002720| 32 2a 73 29 29 3a 78 31 | 3d 78 73 74 2b 28 34 2a |2*s)):x1|=xst+(4*|
|00002730| 73 2a 71 72 29 2b 28 32 | 2a 73 29 3a 61 3d 30 3a |s*qr)+(2|*s):a=0:|
|00002740| f2 68 65 78 28 31 29 0d | 0d 66 0e 20 e3 20 47 3d |.hex(1).|.f. . G=|
|00002750| 31 20 b8 20 35 0d 0d 70 | 0a 20 20 61 6e 3d 30 0d |1 . 5..p|. an=0.|
|00002760| 0d 74 2c 20 20 e3 20 46 | 3d 31 20 b8 20 33 3a 79 |.t, . F|=1 . 3:y|
|00002770| 31 3d 79 31 2b 73 2a b5 | 28 61 6e 29 3a 61 6e 2b |1=y1+s*.|(an):an+|
|00002780| 3d 36 30 2a af 2f 31 38 | 30 3a ed 0d 0d 7a 11 20 |=60*./18|0:...z. |
|00002790| 20 61 3d 30 3a f2 68 65 | 78 28 31 29 0d 0d 84 06 | a=0:.he|x(1)....|
|000027a0| 20 ed 0d 0d 8e 04 0d 0d | 98 33 20 79 31 3d 79 73 | .......|.3 y1=ys|
|000027b0| 74 2b 28 73 2a 30 2e 38 | 36 36 29 3a 78 31 3d 78 |t+(s*0.8|66):x1=x|
|000027c0| 73 74 2b 28 73 2a 71 72 | 29 2b 73 2f 32 3a 61 3d |st+(s*qr|)+s/2:a=|
|000027d0| 30 3a f2 68 65 78 28 32 | 29 0d 0d a2 0e 20 e3 20 |0:.hex(2|).... . |
|000027e0| 47 3d 31 20 b8 20 33 0d | 0d ac 0a 20 20 61 6e 3d |G=1 . 3.|... an=|
|000027f0| 30 0d 0d b1 2c 20 20 e3 | 20 46 3d 31 20 b8 20 33 |0..., .| F=1 . 3|
|00002800| 3a 79 31 3d 79 31 2b 73 | 2a b5 28 61 6e 29 3a 61 |:y1=y1+s|*.(an):a|
|00002810| 6e 2b 3d 36 30 2a af 2f | 31 38 30 3a ed 0d 0d b6 |n+=60*./|180:....|
|00002820| 11 20 20 61 3d 30 3a f2 | 68 65 78 28 32 29 0d 0d |. a=0:.|hex(2)..|
|00002830| c0 06 20 ed 0d 0d ca 04 | 0d 0d d4 39 20 79 31 3d |.. .....|...9 y1=|
|00002840| 79 73 74 2b 28 73 2a 30 | 2e 38 36 36 29 3a 78 31 |yst+(s*0|.866):x1|
|00002850| 3d 78 73 74 2b 28 33 2a | 73 2a 71 72 29 2b 28 31 |=xst+(3*|s*qr)+(1|
|00002860| 2e 35 2a 73 29 3a 61 3d | 30 3a f2 68 65 78 28 32 |.5*s):a=|0:.hex(2|
|00002870| 29 0d 0d de 0e 20 e3 20 | 47 3d 31 20 b8 20 33 0d |).... . |G=1 . 3.|
|00002880| 0d e8 0a 20 20 61 6e 3d | 30 0d 0d ed 2c 20 20 e3 |... an=|0..., .|
|00002890| 20 46 3d 31 20 b8 20 33 | 3a 79 31 3d 79 31 2b 73 | F=1 . 3|:y1=y1+s|
|000028a0| 2a b5 28 61 6e 29 3a 61 | 6e 2b 3d 36 30 2a af 2f |*.(an):a|n+=60*./|
|000028b0| 31 38 30 3a ed 0d 0d f2 | 11 20 20 61 3d 30 3a f2 |180:....|. a=0:.|
|000028c0| 68 65 78 28 32 29 0d 0d | fc 06 20 ed 0d 0e 06 04 |hex(2)..|.. .....|
|000028d0| 0d 0e 10 1a 20 ef 32 36 | 3a f2 66 69 6c 6c 5f 65 |.... .26|:.fill_e|
|000028e0| 6d 3a f2 6c 65 74 74 65 | 72 73 0d 0e 1a 19 20 c8 |m:.lette|rs.... .|
|000028f0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00002900| 22 2c 37 0d 0e 24 3f 20 | c8 99 22 57 69 6d 70 5f |",7..$? |.."Wimp_|
|00002910| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 31 35 3a 61 25 |SetColou|r",15:a%|
|00002920| 3d b0 78 73 74 2d 38 2c | 79 73 74 29 3a e6 20 31 |=.xst-8,|yst):. 1|
|00002930| 32 38 2b 61 25 3a c8 90 | 20 78 73 74 2d 38 2c 79 |28+a%:..| xst-8,y|
|00002940| 73 74 0d 0e 2e 61 20 c8 | 99 22 57 69 6d 70 5f 53 |st...a .|."Wimp_S|
|00002950| 65 74 43 6f 6c 6f 75 72 | 22 2c 31 35 3a 61 25 3d |etColour|",15:a%=|
|00002960| b0 78 73 74 2d 38 2b 28 | 35 2a 73 2a 71 72 29 2b |.xst-8+(|5*s*qr)+|
|00002970| 28 32 2e 35 2a 73 29 2c | 79 73 74 29 3a e6 20 31 |(2.5*s),|yst):. 1|
|00002980| 32 38 2b 61 25 3a c8 90 | 20 78 73 74 2d 38 2b 28 |28+a%:..| xst-8+(|
|00002990| 35 2a 73 2a 71 72 29 2b | 28 32 2e 35 2a 73 29 2c |5*s*qr)+|(2.5*s),|
|000029a0| 79 73 74 0d 0e 38 19 20 | c8 99 22 57 69 6d 70 5f |yst..8. |.."Wimp_|
|000029b0| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 30 0d 0e 42 3b |SetColou|r",0..B;|
|000029c0| 20 61 25 3d b0 78 73 74 | 2b 28 73 2a 71 72 2f 32 | a%=.xst|+(s*qr/2|
|000029d0| 29 2c 79 73 74 2d 34 29 | 3a e6 20 31 32 38 2b 61 |),yst-4)|:. 128+a|
|000029e0| 25 3a c8 90 20 78 73 74 | 2b 28 73 2a 71 72 2f 32 |%:.. xst|+(s*qr/2|
|000029f0| 29 2c 79 73 74 2d 34 0d | 0e 4c 55 20 61 25 3d b0 |),yst-4.|.LU a%=.|
|00002a00| 78 73 74 2b 28 73 2a 71 | 72 29 2b 28 73 2f 32 29 |xst+(s*q|r)+(s/2)|
|00002a10| 2b 28 73 2a 71 72 2f 32 | 29 2c 79 73 74 2d 34 29 |+(s*qr/2|),yst-4)|
|00002a20| 3a e6 20 31 32 38 2b 61 | 25 3a c8 90 20 78 73 74 |:. 128+a|%:.. xst|
|00002a30| 2b 28 73 2a 71 72 29 2b | 28 73 2f 32 29 2b 28 73 |+(s*qr)+|(s/2)+(s|
|00002a40| 2a 71 72 2f 32 29 2c 79 | 73 74 2d 34 0d 0e 56 5d |*qr/2),y|st-4..V]|
|00002a50| 20 61 25 3d b0 78 73 74 | 2b 28 32 2a 73 2a 71 72 | a%=.xst|+(2*s*qr|
|00002a60| 29 2b 28 32 2a 73 2f 32 | 29 2b 28 73 2a 71 72 2f |)+(2*s/2|)+(s*qr/|
|00002a70| 32 29 2c 79 73 74 2d 34 | 29 3a e6 20 31 32 38 2b |2),yst-4|):. 128+|
|00002a80| 61 25 3a c8 90 20 78 73 | 74 2b 28 32 2a 73 2a 71 |a%:.. xs|t+(2*s*q|
|00002a90| 72 29 2b 28 32 2a 73 2f | 32 29 2b 28 73 2a 71 72 |r)+(2*s/|2)+(s*qr|
|00002aa0| 2f 32 29 2c 79 73 74 2d | 34 0d 0e 60 5d 20 61 25 |/2),yst-|4..`] a%|
|00002ab0| 3d b0 78 73 74 2b 28 33 | 2a 73 2a 71 72 29 2b 28 |=.xst+(3|*s*qr)+(|
|00002ac0| 33 2a 73 2f 32 29 2b 28 | 73 2a 71 72 2f 32 29 2c |3*s/2)+(|s*qr/2),|
|00002ad0| 79 73 74 2d 34 29 3a e6 | 20 31 32 38 2b 61 25 3a |yst-4):.| 128+a%:|
|00002ae0| c8 90 20 78 73 74 2b 28 | 33 2a 73 2a 71 72 29 2b |.. xst+(|3*s*qr)+|
|00002af0| 28 33 2a 73 2f 32 29 2b | 28 73 2a 71 72 2f 32 29 |(3*s/2)+|(s*qr/2)|
|00002b00| 2c 79 73 74 2d 34 0d 0e | 6a 5d 20 61 25 3d b0 78 |,yst-4..|j] a%=.x|
|00002b10| 73 74 2b 28 34 2a 73 2a | 71 72 29 2b 28 34 2a 73 |st+(4*s*|qr)+(4*s|
|00002b20| 2f 32 29 2b 28 73 2a 71 | 72 2f 32 29 2c 79 73 74 |/2)+(s*q|r/2),yst|
|00002b30| 2d 34 29 3a e6 20 31 32 | 38 2b 61 25 3a c8 90 20 |-4):. 12|8+a%:.. |
|00002b40| 78 73 74 2b 28 34 2a 73 | 2a 71 72 29 2b 28 34 2a |xst+(4*s|*qr)+(4*|
|00002b50| 73 2f 32 29 2b 28 73 2a | 71 72 2f 32 29 2c 79 73 |s/2)+(s*|qr/2),ys|
|00002b60| 74 2d 34 0d 0e 74 04 0d | 0e 7e 15 20 7a 3d 28 79 |t-4..t..|.~. z=(y|
|00002b70| 73 74 2d 31 32 29 2b 28 | 38 2a 73 29 0d 0e 88 33 |st-12)+(|8*s)...3|
|00002b80| 20 61 25 3d b0 78 73 74 | 2b 28 73 2a 71 72 2f 32 | a%=.xst|+(s*qr/2|
|00002b90| 29 2c 7a 29 3a e6 20 31 | 32 38 2b 61 25 3a c8 90 |),z):. 1|28+a%:..|
|00002ba0| 20 78 73 74 2b 28 73 2a | 71 72 2f 32 29 2c 7a 0d | xst+(s*|qr/2),z.|
|00002bb0| 0e 92 4d 20 61 25 3d b0 | 78 73 74 2b 28 73 2a 71 |..M a%=.|xst+(s*q|
|00002bc0| 72 29 2b 28 73 2f 32 29 | 2b 28 73 2a 71 72 2f 32 |r)+(s/2)|+(s*qr/2|
|00002bd0| 29 2c 7a 29 3a e6 20 31 | 32 38 2b 61 25 3a c8 90 |),z):. 1|28+a%:..|
|00002be0| 20 78 73 74 2b 28 73 2a | 71 72 29 2b 28 73 2f 32 | xst+(s*|qr)+(s/2|
|00002bf0| 29 2b 28 73 2a 71 72 2f | 32 29 2c 7a 0d 0e 9c 55 |)+(s*qr/|2),z...U|
|00002c00| 20 61 25 3d b0 78 73 74 | 2b 28 32 2a 73 2a 71 72 | a%=.xst|+(2*s*qr|
|00002c10| 29 2b 28 32 2a 73 2f 32 | 29 2b 28 73 2a 71 72 2f |)+(2*s/2|)+(s*qr/|
|00002c20| 32 29 2c 7a 29 3a e6 20 | 31 32 38 2b 61 25 3a c8 |2),z):. |128+a%:.|
|00002c30| 90 20 78 73 74 2b 28 32 | 2a 73 2a 71 72 29 2b 28 |. xst+(2|*s*qr)+(|
|00002c40| 32 2a 73 2f 32 29 2b 28 | 73 2a 71 72 2f 32 29 2c |2*s/2)+(|s*qr/2),|
|00002c50| 7a 0d 0e a6 55 20 61 25 | 3d b0 78 73 74 2b 28 33 |z...U a%|=.xst+(3|
|00002c60| 2a 73 2a 71 72 29 2b 28 | 33 2a 73 2f 32 29 2b 28 |*s*qr)+(|3*s/2)+(|
|00002c70| 73 2a 71 72 2f 32 29 2c | 7a 29 3a e6 20 31 32 38 |s*qr/2),|z):. 128|
|00002c80| 2b 61 25 3a c8 90 20 78 | 73 74 2b 28 33 2a 73 2a |+a%:.. x|st+(3*s*|
|00002c90| 71 72 29 2b 28 33 2a 73 | 2f 32 29 2b 28 73 2a 71 |qr)+(3*s|/2)+(s*q|
|00002ca0| 72 2f 32 29 2c 7a 0d 0e | b0 55 20 61 25 3d b0 78 |r/2),z..|.U a%=.x|
|00002cb0| 73 74 2b 28 34 2a 73 2a | 71 72 29 2b 28 34 2a 73 |st+(4*s*|qr)+(4*s|
|00002cc0| 2f 32 29 2b 28 73 2a 71 | 72 2f 32 29 2c 7a 29 3a |/2)+(s*q|r/2),z):|
|00002cd0| e6 20 31 32 38 2b 61 25 | 3a c8 90 20 78 73 74 2b |. 128+a%|:.. xst+|
|00002ce0| 28 34 2a 73 2a 71 72 29 | 2b 28 34 2a 73 2f 32 29 |(4*s*qr)|+(4*s/2)|
|00002cf0| 2b 28 73 2a 71 72 2f 32 | 29 2c 7a 0d 0e ba 19 20 |+(s*qr/2|),z.... |
|00002d00| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00002d10| 72 22 2c 37 0d 0e bb 0e | 20 e3 20 47 3d 31 20 b8 |r",7....| . G=1 .|
|00002d20| 20 35 0d 0e c4 38 20 20 | 79 3d 79 73 74 2b 28 73 | 5...8 |y=yst+(s|
|00002d30| 2a 30 2e 38 36 36 29 2b | 28 47 2d 31 29 2a 28 32 |*0.866)+|(G-1)*(2|
|00002d40| 2a 73 2a 30 2e 38 36 36 | 29 3a ec 20 78 73 74 2d |*s*0.866|):. xst-|
|00002d50| 28 73 2f 32 29 2d 31 32 | 2c 79 0d 0e c6 13 20 20 |(s/2)-12|,y.... |
|00002d60| df 20 78 73 74 2d 28 73 | 2f 32 29 2c 79 0d 0e c7 |. xst-(s|/2),y...|
|00002d70| 06 20 ed 0d 0e ce 19 20 | c8 99 22 57 69 6d 70 5f |. ..... |.."Wimp_|
|00002d80| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 37 0d 0e d0 0e |SetColou|r",7....|
|00002d90| 20 e3 20 47 3d 31 20 b8 | 20 35 0d 0e d8 27 20 20 | . G=1 .| 5...' |
|00002da0| 79 3d 79 73 74 2b 28 73 | 2a 30 2e 38 36 36 29 2b |y=yst+(s|*0.866)+|
|00002db0| 28 47 2d 31 29 2a 28 32 | 2a 73 2a 30 2e 38 36 36 |(G-1)*(2|*s*0.866|
|00002dc0| 29 0d 0e d9 28 20 20 ec | 20 78 73 74 2d 28 73 2f |)...( .| xst-(s/|
|00002dd0| 32 29 2d 31 32 2b 28 35 | 2a 73 2a 71 72 29 2b 28 |2)-12+(5|*s*qr)+(|
|00002de0| 33 2a 73 29 2b 31 32 2c | 79 0d 0e da 25 20 20 df |3*s)+12,|y...% .|
|00002df0| 20 78 73 74 2b 28 35 2a | 73 2a 71 72 29 2b 28 33 | xst+(5*|s*qr)+(3|
|00002e00| 2a 73 29 2b 31 32 2d 28 | 73 2f 32 29 2c 79 0d 0e |*s)+12-(|s/2),y..|
|00002e10| dd 06 20 ed 0d 0e e2 04 | 0d 0e ec 17 20 f2 63 61 |.. .....|.... .ca|
|00002e20| 72 64 3a f2 73 68 6f 77 | 5f 73 63 6f 72 65 73 0d |rd:.show|_scores.|
|00002e30| 0e f6 06 20 e1 0d 0f 00 | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00002e40| 2d 2d 2d 2d 2d 0d 0f 0a | 0d 20 dd f2 68 65 78 28 |-----...|. ..hex(|
|00002e50| 54 29 0d 0f 14 19 20 c8 | 99 22 57 69 6d 70 5f 53 |T).... .|."Wimp_S|
|00002e60| 65 74 43 6f 6c 6f 75 72 | 22 2c 37 0d 0f 1e 0e 20 |etColour|",7.... |
|00002e70| e3 20 46 3d 31 20 b8 20 | 36 0d 0f 28 29 20 20 61 |. F=1 . |6..() a|
|00002e80| 6e 3d 61 2a af 2f 31 38 | 30 3a e7 20 61 3d 30 20 |n=a*./18|0:. a=0 |
|00002e90| 84 20 61 3d 31 38 30 20 | 71 3d 71 72 20 8b 20 71 |. a=180 |q=qr . q|
|00002ea0| 3d 31 0d 0f 32 0d 20 20 | ec 20 78 31 2c 79 31 0d |=1..2. |. x1,y1.|
|00002eb0| 0f 3c 25 20 20 e7 20 54 | 3d 31 20 df 20 78 31 2b |.<% . T|=1 . x1+|
|00002ec0| 73 2a 71 2a 9b 28 61 6e | 29 2c 79 31 2b 73 2a b5 |s*q*.(an|),y1+s*.|
|00002ed0| 28 61 6e 29 0d 0f 46 33 | 20 20 e7 20 54 3d 32 3a |(an)..F3| . T=2:|
|00002ee0| e7 20 61 3d 30 20 84 20 | 61 3d 31 38 30 20 df 20 |. a=0 . |a=180 . |
|00002ef0| 78 31 2b 73 2a 71 2a 9b | 28 61 6e 29 2c 79 31 2b |x1+s*q*.|(an),y1+|
|00002f00| 73 2a b5 28 61 6e 29 0d | 0f 50 3b 20 20 e7 20 54 |s*.(an).|.P; . T|
|00002f10| 3d 32 3a e7 20 47 3d 33 | 3a e7 20 61 3d 31 32 30 |=2:. G=3|:. a=120|
|00002f20| 20 84 20 61 3d 32 34 30 | 20 df 20 78 31 2b 73 2a | . a=240| . x1+s*|
|00002f30| 71 2a 9b 28 61 6e 29 2c | 79 31 2b 73 2a b5 28 61 |q*.(an),|y1+s*.(a|
|00002f40| 6e 29 0d 0f 5a 2b 20 20 | 78 31 3d 78 31 2b 73 2a |n)..Z+ |x1=x1+s*|
|00002f50| 71 2a 9b 28 61 6e 29 3a | 79 31 3d 79 31 2b 73 2a |q*.(an):|y1=y1+s*|
|00002f60| 71 2a b5 28 61 6e 29 3a | 61 2b 3d 36 30 0d 0f 6e |q*.(an):|a+=60..n|
|00002f70| 06 20 ed 0d 0f 78 06 20 | e1 0d 0f 82 10 20 f4 2d |. ...x. |..... .-|
|00002f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0f 8c 0e 20 dd f2 |--------|-.... ..|
|00002f90| 66 69 6c 6c 5f 65 6d 0d | 0f 96 19 20 c8 99 22 57 |fill_em.|... .."W|
|00002fa0| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 39 |imp_SetC|olour",9|
|00002fb0| 0d 0f 97 18 20 e3 20 46 | 3d 31 20 b8 20 35 3a e3 |.... . F|=1 . 5:.|
|00002fc0| 20 47 3d 31 20 b8 20 34 | 0d 0f aa 4b 20 20 78 3d | G=1 . 4|...K x=|
|00002fd0| 78 73 74 2b 28 73 2a 71 | 72 2f 32 29 2b 28 28 46 |xst+(s*q|r/2)+((F|
|00002fe0| 2d 31 29 2a 28 28 73 2a | 71 72 29 2b 73 2f 32 29 |-1)*((s*|qr)+s/2)|
|00002ff0| 29 3a 79 3d 79 73 74 2b | 28 73 2a 30 2e 38 36 36 |):y=yst+|(s*0.866|
|00003000| 29 2b 28 47 2d 31 29 2a | 28 32 2a 73 2a 30 2e 38 |)+(G-1)*|(2*s*0.8|
|00003010| 36 36 29 0d 0f b4 21 20 | 20 e7 20 28 46 2d 31 29 |66)...! | . (F-1)|
|00003020| 20 83 20 32 3d 31 20 79 | 3d 79 2b 28 73 2a 30 2e | . 2=1 y|=y+(s*0.|
|00003030| 38 36 36 29 0d 0f be 1e | 20 20 61 25 3d b0 78 2c |866)....| a%=.x,|
|00003040| 79 29 3a e6 20 31 32 38 | 2b 61 25 3a c8 90 20 78 |y):. 128|+a%:.. x|
|00003050| 2c 79 0d 0f c8 08 20 ed | 3a ed 0d 0f cc 06 20 e1 |,y.... .|:..... .|
|00003060| 0d 0f dc 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00003070| 0d 0f e6 16 20 dd f2 66 | 69 6c 6c 5f 6f 6e 65 28 |.... ..f|ill_one(|
|00003080| 63 2c 6a 2c 6b 29 0d 0f | f0 19 20 c8 99 22 57 69 |c,j,k)..|.. .."Wi|
|00003090| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 39 0d |mp_SetCo|lour",9.|
|000030a0| 0f fa 4a 20 78 3d 78 73 | 74 2b 28 73 2a 71 72 2f |..J x=xs|t+(s*qr/|
|000030b0| 32 29 2b 28 28 6a 2d 31 | 29 2a 28 28 73 2a 71 72 |2)+((j-1|)*((s*qr|
|000030c0| 29 2b 73 2f 32 29 29 3a | 79 3d 79 73 74 2b 28 73 |)+s/2)):|y=yst+(s|
|000030d0| 2a 30 2e 38 36 36 29 2b | 28 6b 2d 31 29 2a 28 32 |*0.866)+|(k-1)*(2|
|000030e0| 2a 73 2a 30 2e 38 36 36 | 29 0d 10 04 20 20 e7 20 |*s*0.866|)... . |
|000030f0| 28 6a 2d 31 29 20 83 20 | 32 3d 31 20 79 3d 79 2b |(j-1) . |2=1 y=y+|
|00003100| 28 73 2a 30 2e 38 36 36 | 29 0d 10 0e 2d 20 c8 8f |(s*0.866|)...- ..|
|00003110| 20 c8 90 20 78 2c 79 2c | 33 32 3a 63 6f 6c 5f 72 | .. x,y,|32:col_r|
|00003120| 61 6e 67 65 3d 31 35 3a | e6 20 30 2c 63 3a 61 25 |ange=15:|. 0,c:a%|
|00003130| 3d b0 78 2c 79 29 0d 10 | 22 2e 20 e7 20 63 6f 6c |=.x,y)..|". . col|
|00003140| 5f 72 61 6e 67 65 3d 31 | 35 20 e6 20 31 32 38 2b |_range=1|5 . 128+|
|00003150| 61 25 20 8b 20 e6 20 31 | 32 38 2b 61 25 20 c8 9c |a% . . 1|28+a% ..|
|00003160| 20 61 74 25 0d 10 2c 29 | 20 c8 90 20 78 2c 79 3a | at%..,)| .. x,y:|
|00003170| e7 20 77 68 69 74 65 25 | 3d b9 20 67 72 69 64 28 |. white%|=. grid(|
|00003180| 6a 2c 6b 29 3d 31 3a f2 | 63 68 65 63 6b 0d 10 40 |j,k)=1:.|check..@|
|00003190| 22 20 e7 20 62 6c 75 65 | 25 3d b9 20 67 72 69 64 |" . blue|%=. grid|
|000031a0| 28 6a 2c 6b 29 3d 32 3a | f2 63 68 65 63 6b 32 0d |(j,k)=2:|.check2.|
|000031b0| 10 4a 06 20 e1 0d 10 54 | 10 20 f4 2d 2d 2d 2d 2d |.J. ...T|. .-----|
|000031c0| 2d 2d 2d 2d 2d 0d 10 5e | 10 20 dd f2 63 61 6c 63 |-----..^|. ..calc|
|000031d0| 5f 70 6f 73 6e 0d 10 68 | 3e 20 78 3d 78 73 74 2b |_posn..h|> x=xst+|
|000031e0| 73 2f 32 2b 28 28 6a 2d | 31 29 2a 73 2a 31 2e 35 |s/2+((j-|1)*s*1.5|
|000031f0| 29 3a 79 3d 79 73 74 2b | 28 73 2a 30 2e 38 36 36 |):y=yst+|(s*0.866|
|00003200| 29 2b 28 6b 2d 31 29 2a | 28 32 2a 73 2a 30 2e 38 |)+(k-1)*|(2*s*0.8|
|00003210| 36 36 29 0d 10 72 20 20 | e7 20 28 6a 2d 31 29 20 |66)..r |. (j-1) |
|00003220| 83 20 32 3d 31 20 79 3d | 79 2b 28 73 2a 30 2e 38 |. 2=1 y=|y+(s*0.8|
|00003230| 36 36 29 0d 10 73 06 20 | e1 0d 10 86 10 20 f4 2d |66)..s. |..... .-|
|00003240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 10 90 0c 20 dd f2 |--------|-.... ..|
|00003250| 63 68 65 63 6b 0d 10 9a | 27 20 c8 99 22 4f 53 5f |check...|' .."OS_|
|00003260| 53 70 72 69 74 65 4f 70 | 22 2c 33 31 36 2c 69 63 |SpriteOp|",316,ic|
|00003270| 6f 6e 73 2c 22 67 72 69 | 64 22 2c 30 0d 10 a4 2b |ons,"gri|d",0...+|
|00003280| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|00003290| 75 72 22 2c 30 3a c8 93 | 20 c8 90 20 30 2c 30 2c |ur",0:..| .. 0,0,|
|000032a0| 34 30 30 2c 34 30 30 0d | 10 ae 2f 20 c8 99 22 57 |400,400.|../ .."W|
|000032b0| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 37 |imp_SetC|olour",7|
|000032c0| 3a c8 93 20 31 32 2c 30 | 2c 32 36 30 2c 32 30 38 |:.. 12,0|,260,208|
|000032d0| 2b 32 36 2b 32 36 0d 10 | b8 18 20 e3 20 46 3d 31 |+26+26..|.. . F=1|
|000032e0| 20 b8 20 35 3a e3 20 47 | 3d 31 20 b8 20 34 0d 10 | . 5:. G|=1 . 4..|
|000032f0| c2 1e 20 20 e7 20 46 20 | 83 20 32 3d 30 20 6f 66 |.. . F |. 2=0 of|
|00003300| 66 3d 32 36 20 8b 20 6f | 66 66 3d 30 0d 10 cc 30 |f=26 . o|ff=0...0|
|00003310| 20 20 c8 93 20 31 32 2b | 28 28 46 2d 31 29 2a 35 | .. 12+|((F-1)*5|
|00003320| 32 29 2c 31 32 2b 28 28 | 28 47 2d 31 29 2a 35 32 |2),12+((|(G-1)*52|
|00003330| 29 2b 6f 66 66 29 2c 35 | 32 2c 35 32 0d 10 d6 08 |)+off),5|2,52....|
|00003340| 20 ed 3a ed 0d 10 e0 19 | 20 c8 99 22 57 69 6d 70 | .:.....| .."Wimp|
|00003350| 5f 53 65 74 43 6f 6c 6f | 75 72 22 2c 30 0d 10 ea |_SetColo|ur",0...|
|00003360| 0e 20 e3 20 46 3d 31 20 | b8 20 35 0d 10 ec 0f 20 |. . F=1 |. 5.... |
|00003370| 20 e3 20 47 3d 31 20 b8 | 20 33 0d 10 f4 1f 20 20 | . G=1 .| 3.... |
|00003380| 20 e7 20 46 20 83 20 32 | 3d 30 20 6f 66 66 3d 32 | . F . 2|=0 off=2|
|00003390| 36 20 8b 20 6f 66 66 3d | 30 0d 10 fe 26 20 20 20 |6 . off=|0...& |
|000033a0| e7 20 67 72 69 64 28 46 | 2c 47 29 3d 31 20 80 20 |. grid(F|,G)=1 . |
|000033b0| 67 72 69 64 28 46 2c 47 | 2b 31 29 3d 31 20 8c 0d |grid(F,G|+1)=1 ..|
|000033c0| 11 08 3c 20 20 20 20 c8 | 93 20 c8 90 20 31 32 2b |..< .|. .. 12+|
|000033d0| 28 28 46 2d 31 29 2a 35 | 32 29 2b 32 36 2d 31 32 |((F-1)*5|2)+26-12|
|000033e0| 2c 31 32 2b 28 28 28 47 | 29 2a 35 32 29 2b 6f 66 |,12+(((G|)*52)+of|
|000033f0| 66 29 2d 31 32 2c 32 34 | 2c 32 34 0d 11 12 08 20 |f)-12,24|,24.... |
|00003400| 20 20 cd 0d 11 1c 51 20 | 20 20 e7 20 47 3d 31 20 | ....Q | . G=1 |
|00003410| 80 20 67 72 69 64 28 46 | 2c 47 29 3d 31 20 c8 93 |. grid(F|,G)=1 ..|
|00003420| 20 c8 90 20 31 32 2b 28 | 28 46 2d 31 29 2a 35 32 | .. 12+(|(F-1)*52|
|00003430| 29 2b 32 36 2d 31 32 2c | 31 36 2b 28 28 28 47 2d |)+26-12,|16+(((G-|
|00003440| 31 29 2a 35 32 29 2b 6f | 66 66 29 2d 31 32 2c 32 |1)*52)+o|ff)-12,2|
|00003450| 34 2c 32 34 0d 11 26 07 | 20 20 ed 0d 11 30 48 20 |4,24..&.| ...0H |
|00003460| 20 e7 20 67 72 69 64 28 | 46 2c 34 29 3d 31 20 c8 | . grid(|F,4)=1 .|
|00003470| 93 20 c8 90 20 31 32 2b | 28 28 46 2d 31 29 2a 35 |. .. 12+|((F-1)*5|
|00003480| 32 29 2b 32 36 2d 31 32 | 2c 31 32 2b 28 28 28 34 |2)+26-12|,12+(((4|
|00003490| 29 2a 35 32 29 2b 6f 66 | 66 29 2d 31 36 2c 32 34 |)*52)+of|f)-16,24|
|000034a0| 2c 32 34 0d 11 3a 06 20 | ed 0d 11 44 04 0d 11 4e |,24..:. |...D...N|
|000034b0| 0e 20 f4 20 63 6f 6c 75 | 6d 6e 73 0d 11 58 0e 20 |. . colu|mns..X. |
|000034c0| e3 20 46 3d 31 20 b8 20 | 34 0d 11 62 0f 20 20 e3 |. F=1 . |4..b. .|
|000034d0| 20 47 3d 31 20 b8 20 34 | 0d 11 6c 15 20 20 e7 20 | G=1 . 4|..l. . |
|000034e0| 67 72 69 64 28 46 2c 47 | 29 3d 31 20 8c 0d 11 76 |grid(F,G|)=1 ...v|
|000034f0| 12 20 20 20 e7 20 46 20 | 83 20 32 3d 31 20 8c 0d |. . F |. 2=1 ..|
|00003500| 11 80 45 20 20 20 20 e7 | 20 67 72 69 64 28 46 2b |..E .| grid(F+|
|00003510| 31 2c 47 29 3d 31 20 c8 | 93 20 c8 90 20 31 32 2b |1,G)=1 .|. .. 12+|
|00003520| 28 28 46 29 2a 35 32 29 | 2d 31 32 2c 31 32 2b 28 |((F)*52)|-12,12+(|
|00003530| 28 47 29 2a 35 32 29 2b | 6f 66 66 2d 31 38 2c 32 |(G)*52)+|off-18,2|
|00003540| 34 2c 31 32 0d 11 8a 49 | 20 20 20 20 e7 20 67 72 |4,12...I| . gr|
|00003550| 69 64 28 46 2b 31 2c 47 | 2d 31 29 3d 31 20 c8 93 |id(F+1,G|-1)=1 ..|
|00003560| 20 c8 90 20 31 32 2b 28 | 28 46 29 2a 35 32 29 2d | .. 12+(|(F)*52)-|
|00003570| 31 32 2c 31 32 2b 28 28 | 47 29 2a 35 32 29 2b 6f |12,12+((|G)*52)+o|
|00003580| 66 66 2d 31 38 2d 32 36 | 2c 32 34 2c 38 0d 11 94 |ff-18-26|,24,8...|
|00003590| 08 20 20 20 cc 0d 11 9e | 45 20 20 20 20 e7 20 67 |. ....|E . g|
|000035a0| 72 69 64 28 46 2b 31 2c | 47 29 3d 31 20 c8 93 20 |rid(F+1,|G)=1 .. |
|000035b0| c8 90 20 31 32 2b 28 28 | 46 29 2a 35 32 29 2d 31 |.. 12+((|F)*52)-1|
|000035c0| 32 2c 31 32 2b 28 28 47 | 29 2a 35 32 29 2b 6f 66 |2,12+((G|)*52)+of|
|000035d0| 66 2d 31 38 2c 32 34 2c | 31 32 0d 11 a8 4f 20 20 |f-18,24,|12...O |
|000035e0| 20 20 e7 20 47 3c 34 3a | e7 20 67 72 69 64 28 46 | . G<4:|. grid(F|
|000035f0| 2b 31 2c 47 2b 31 29 3d | 31 20 c8 93 20 c8 90 20 |+1,G+1)=|1 .. .. |
|00003600| 31 32 2b 28 28 46 29 2a | 35 32 29 2d 31 32 2c 31 |12+((F)*|52)-12,1|
|00003610| 32 2b 28 28 47 29 2a 35 | 32 29 2b 6f 66 66 2d 31 |2+((G)*5|2)+off-1|
|00003620| 38 2b 32 36 2c 32 34 2c | 38 0d 11 b2 08 20 20 20 |8+26,24,|8.... |
|00003630| cd 0d 11 bc 07 20 20 cd | 0d 11 c6 07 20 20 ed 0d |..... .|.... ..|
|00003640| 11 d0 06 20 ed 0d 11 da | 04 0d 11 e4 16 20 62 25 |... ....|..... b%|
|00003650| 3d b0 31 32 2b 35 32 2b | 32 36 2c 32 35 32 29 0d |=.12+52+|26,252).|
|00003660| 11 ee 2a 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |..* .."W|imp_SetC|
|00003670| 6f 6c 6f 75 72 22 2c 31 | 31 3a 61 25 3d b0 31 32 |olour",1|1:a%=.12|
|00003680| 2b 35 32 2b 32 36 2c 38 | 29 0d 11 f0 1d 20 e6 20 |+52+26,8|).... . |
|00003690| 31 32 38 2b 61 25 3a c8 | 90 20 28 31 32 2b 35 32 |128+a%:.|. (12+52|
|000036a0| 2b 32 36 29 2c 38 0d 11 | f8 39 20 77 68 69 74 65 |+26),8..|.9 white|
|000036b0| 5f 77 6f 6e 25 3d a3 3a | 61 25 3d b0 31 32 2b 35 |_won%=.:|a%=.12+5|
|000036c0| 32 2b 32 36 2c 32 35 32 | 29 3a e7 20 61 25 3c 3e |2+26,252|):. a%<>|
|000036d0| 62 25 20 77 68 69 74 65 | 5f 77 6f 6e 25 3d b9 0d |b% white|_won%=..|
|000036e0| 12 02 22 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |.." .."O|S_Sprite|
|000036f0| 4f 70 22 2c 33 31 36 2c | 69 63 6f 6e 73 2c 30 2c |Op",316,|icons,0,|
|00003700| 31 0d 12 16 06 20 e1 0d | 12 20 10 20 f4 2d 2d 2d |1.... ..|. . .---|
|00003710| 2d 2d 2d 2d 2d 2d 2d 0d | 12 2a 0d 20 dd f2 73 65 |-------.|.*. ..se|
|00003720| 74 75 70 34 0d 12 34 22 | 20 de 20 66 69 6c 65 5f |tup4..4"| . file_|
|00003730| 61 72 65 61 20 35 30 30 | 30 30 2c 66 69 6c 65 5f |area 500|00,file_|
|00003740| 70 74 72 20 31 35 0d 12 | 3e 4a 20 c8 99 22 4d 65 |ptr 15..|>J .."Me|
|00003750| 73 73 61 67 65 54 72 61 | 6e 73 5f 4f 70 65 6e 46 |ssageTra|ns_OpenF|
|00003760| 69 6c 65 22 2c 66 69 6c | 65 5f 70 74 72 2c 28 70 |ile",fil|e_ptr,(p|
|00003770| 61 74 68 24 2b 22 2e 46 | 69 6c 65 73 2e 47 65 6e |ath$+".F|iles.Gen|
|00003780| 65 72 61 6c 22 29 2c 66 | 69 6c 65 5f 61 72 65 61 |eral"),f|ile_area|
|00003790| 0d 12 48 06 20 e1 0d 12 | 52 10 20 f4 2d 2d 2d 2d |..H. ...|R. .----|
|000037a0| 2d 2d 2d 2d 2d 2d 0d 12 | 5c 15 20 dd f2 66 69 6c |------..|\. ..fil|
|000037b0| 65 5f 73 63 61 6e 28 74 | 73 24 29 0d 12 66 3d 20 |e_scan(t|s$)..f= |
|000037c0| c8 99 22 4d 65 73 73 61 | 67 65 54 72 61 6e 73 5f |.."Messa|geTrans_|
|000037d0| 4c 6f 6f 6b 75 70 22 2c | 66 69 6c 65 5f 70 74 72 |Lookup",|file_ptr|
|000037e0| 2c 74 73 24 2c 30 20 b8 | 20 2c 2c 63 5f 70 74 72 |,ts$,0 .| ,,c_ptr|
|000037f0| 25 2c 63 5f 6c 65 6e 25 | 0d 12 70 3d 20 74 65 78 |%,c_len%|..p= tex|
|00003800| 74 24 3d 22 22 3a e3 20 | 6c 6f 6f 70 31 34 3d 30 |t$="":. |loop14=0|
|00003810| 20 b8 20 63 5f 6c 65 6e | 25 2d 31 3a 74 65 78 74 | . c_len|%-1:text|
|00003820| 24 2b 3d bd 28 63 5f 70 | 74 72 25 3f 6c 6f 6f 70 |$+=.(c_p|tr%?loop|
|00003830| 31 34 29 3a ed 0d 12 7a | 06 20 e1 0d 12 84 10 20 |14):...z|. ..... |
|00003840| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 12 8e 10 20 |.-------|---.... |
|00003850| dd f2 73 65 74 5f 61 72 | 72 61 79 0d 12 8f 28 20 |..set_ar|ray...( |
|00003860| e3 20 46 3d 31 20 b8 20 | 35 3a e3 20 47 3d 31 20 |. F=1 . |5:. G=1 |
|00003870| b8 20 34 3a 67 72 69 64 | 28 46 2c 47 29 3d 30 3a |. 4:grid|(F,G)=0:|
|00003880| ed 3a ed 0d 12 98 0e 20 | 61 72 5f 6c 69 6d 25 3d |.:..... |ar_lim%=|
|00003890| 31 0d 12 a2 10 20 e3 20 | 46 3d 36 35 20 b8 20 39 |1.... . |F=65 . 9|
|000038a0| 30 0d 12 ac 1e 20 20 6c | 24 3d c4 33 2c bd 46 29 |0.... l|$=.3,.F)|
|000038b0| 3a f2 66 69 6c 65 5f 73 | 63 61 6e 28 6c 24 29 0d |:.file_s|can(l$).|
|000038c0| 12 b6 2b 20 20 e7 20 74 | 65 78 74 24 3c 3e 22 30 |..+ . t|ext$<>"0|
|000038d0| 22 20 41 72 28 61 72 5f | 6c 69 6d 25 29 3d 46 3a |" Ar(ar_|lim%)=F:|
|000038e0| 61 72 5f 6c 69 6d 25 2b | 3d 31 0d 12 c0 06 20 ed |ar_lim%+|=1.... .|
|000038f0| 0d 12 ca 0f 20 61 72 5f | 6c 69 6d 25 2d 3d 31 0d |.... ar_|lim%-=1.|
|00003900| 12 d4 14 20 e3 20 46 3d | 31 20 b8 20 61 72 5f 6c |... . F=|1 . ar_l|
|00003910| 69 6d 25 0d 12 de 18 20 | 20 e7 20 41 72 28 46 29 |im%.... | . Ar(F)|
|00003920| 3e 30 20 41 72 32 28 46 | 29 3d 31 0d 12 e8 06 20 |>0 Ar2(F|)=1.... |
|00003930| ed 0d 12 f2 06 20 e1 0d | 12 fc 10 20 f4 2d 2d 2d |..... ..|... .---|
|00003940| 2d 2d 2d 2d 2d 2d 2d 0d | 13 06 0e 20 dd f2 6c 65 |-------.|... ..le|
|00003950| 74 74 65 72 73 0d 13 10 | 18 20 e3 20 46 3d 31 20 |tters...|. . F=1 |
|00003960| b8 20 35 3a e3 20 47 3d | 31 20 b8 20 34 0d 13 1a |. 5:. G=|1 . 4...|
|00003970| 1f 20 20 f5 3a 71 3d b3 | 28 61 72 5f 6c 69 6d 25 |. .:q=.|(ar_lim%|
|00003980| 29 3a fd 20 41 72 32 28 | 71 29 3d 31 0d 13 24 1d |):. Ar2(|q)=1..$.|
|00003990| 20 20 41 72 32 28 71 29 | 3d 32 3a 4c 65 74 28 46 | Ar2(q)|=2:Let(F|
|000039a0| 2c 47 29 3d 41 72 28 71 | 29 0d 13 2e 1a 20 20 c8 |,G)=Ar(q|).... .|
|000039b0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|000039c0| 22 2c 37 0d 13 38 4b 20 | 20 78 3d 78 73 74 2b 28 |",7..8K | x=xst+(|
|000039d0| 73 2a 71 72 2f 32 29 2b | 28 28 46 2d 31 29 2a 28 |s*qr/2)+|((F-1)*(|
|000039e0| 28 73 2a 71 72 29 2b 73 | 2f 32 29 29 3a 79 3d 79 |(s*qr)+s|/2)):y=y|
|000039f0| 73 74 2b 28 73 2a 30 2e | 38 36 36 29 2b 28 47 2d |st+(s*0.|866)+(G-|
|00003a00| 31 29 2a 28 32 2a 73 2a | 30 2e 38 36 36 29 0d 13 |1)*(2*s*|0.866)..|
|00003a10| 42 21 20 20 e7 20 28 46 | 2d 31 29 20 83 20 32 3d |B! . (F|-1) . 2=|
|00003a20| 31 20 79 3d 79 2b 28 73 | 2a 30 2e 38 36 36 29 0d |1 y=y+(s|*0.866).|
|00003a30| 13 4c 30 20 20 f2 70 69 | 63 74 75 72 65 28 33 32 |.L0 .pi|cture(32|
|00003a40| 2a 73 6b 6c 32 2c 35 32 | 2a 73 6b 6c 2c 69 63 6f |*skl2,52|*skl,ico|
|00003a50| 6e 73 2c bd 28 4c 65 74 | 28 46 2c 47 29 29 29 0d |ns,.(Let|(F,G))).|
|00003a60| 13 56 49 20 20 c8 99 22 | 4f 53 5f 53 70 72 69 74 |.VI .."|OS_Sprit|
|00003a70| 65 4f 70 22 2c 35 36 34 | 2c 69 63 6f 6e 73 2c 61 |eOp",564|,icons,a|
|00003a80| 64 64 25 2c 78 2d 28 73 | 78 25 2f 32 29 2c 79 2d |dd%,x-(s|x%/2),y-|
|00003a90| 28 73 79 25 2f 32 29 2c | 26 30 38 2c 6d 61 67 25 |(sy%/2),|&08,mag%|
|00003aa0| 2c 74 72 61 6e 73 32 25 | 0d 13 6a 08 20 ed 3a ed |,trans2%|..j. .:.|
|00003ab0| 0d 13 74 14 20 e3 20 46 | 3d 31 20 b8 20 61 72 5f |..t. . F|=1 . ar_|
|00003ac0| 6c 69 6d 25 0d 13 7e 19 | 20 20 e7 20 41 72 32 28 |lim%..~.| . Ar2(|
|00003ad0| 46 29 3d 31 20 41 72 32 | 28 46 29 3d 30 0d 13 88 |F)=1 Ar2|(F)=0...|
|00003ae0| 19 20 20 e7 20 41 72 32 | 28 46 29 3d 32 20 41 72 |. . Ar2|(F)=2 Ar|
|00003af0| 32 28 46 29 3d 31 0d 13 | 92 06 20 ed 0d 13 9c 06 |2(F)=1..|.. .....|
|00003b00| 20 e1 0d 13 a6 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00003b10| 2d 2d 0d 13 b0 14 20 dd | f2 71 75 65 73 74 69 6f |--.... .|.questio|
|00003b20| 6e 28 6b 65 79 29 0d 13 | ba 1f 20 46 46 3d 30 3a |n(key)..|.. FF=0:|
|00003b30| 47 47 3d 30 3a e7 20 6b | 65 79 3e 39 30 20 6b 65 |GG=0:. k|ey>90 ke|
|00003b40| 79 2d 3d 33 32 0d 13 c4 | 18 20 e3 20 46 3d 31 20 |y-=32...|. . F=1 |
|00003b50| b8 20 35 3a e3 20 47 3d | 31 20 b8 20 34 0d 13 ce |. 5:. G=|1 . 4...|
|00003b60| 1e 20 20 e7 20 4c 65 74 | 28 46 2c 47 29 3d 6b 65 |. . Let|(F,G)=ke|
|00003b70| 79 20 46 46 3d 46 3a 47 | 47 3d 47 0d 13 d8 08 20 |y FF=F:G|G=G.... |
|00003b80| ed 3a ed 0d 13 e2 10 20 | e7 20 46 46 3d 30 20 ef |.:..... |. FF=0 .|
|00003b90| 37 3a e1 0d 13 ec 0b 20 | 66 6c 61 67 3d b9 0d 13 |7:..... |flag=...|
|00003ba0| ee 14 20 e3 20 46 3d 31 | 20 b8 20 61 72 5f 6c 69 |.. . F=1| . ar_li|
|00003bb0| 6d 25 0d 13 f6 23 20 20 | e7 20 41 72 28 46 29 3d |m%...# |. Ar(F)=|
|00003bc0| 6b 65 79 20 80 20 41 72 | 32 28 46 29 3c 31 20 66 |key . Ar|2(F)<1 f|
|00003bd0| 6c 61 67 3d a3 0d 14 00 | 06 20 ed 0d 14 0a 12 20 |lag=....|. ..... |
|00003be0| e7 20 66 6c 61 67 3d a3 | 20 ef 37 3a e1 0d 14 14 |. flag=.| .7:....|
|00003bf0| 04 0d 14 1e 35 20 6d 3d | 4c 65 74 28 46 46 2c 47 |....5 m=|Let(FF,G|
|00003c00| 47 29 3a 6c 24 3d c4 33 | 2c bd 6d 29 3a f2 66 69 |G):l$=.3|,.m):.fi|
|00003c10| 6c 65 5f 73 63 61 6e 28 | 6c 24 29 3a 6d 3d a0 28 |le_scan(|l$):m=.(|
|00003c20| 74 65 78 74 24 29 0d 14 | 32 0c 20 e7 20 6d 3e 31 |text$)..|2. . m>1|
|00003c30| 20 8c 0d 14 37 07 20 20 | f5 0d 14 3c 27 20 20 20 | ...7. |...<' |
|00003c40| 6d 3d b3 28 6d 29 3a 6d | 24 3d c3 28 6d 29 3a e7 |m=.(m):m|$=.(m):.|
|00003c50| 20 a9 6d 24 3d 31 20 6d | 24 3d 22 30 22 2b 6d 24 | .m$=1 m|$="0"+m$|
|00003c60| 0d 14 46 1a 20 20 20 6c | 24 3d bd 28 4c 65 74 28 |..F. l|$=.(Let(|
|00003c70| 46 46 2c 47 47 29 29 2b | 6d 24 0d 14 4b 12 20 20 |FF,GG))+|m$..K. |
|00003c80| fd 20 71 5f 6f 6c 64 24 | 3c 3e 6c 24 0d 14 4c 06 |. q_old$|<>l$..L.|
|00003c90| 20 cc 0d 14 4d 21 20 20 | 6d 24 3d 22 30 31 22 3a | ...M! |m$="01":|
|00003ca0| 6c 24 3d bd 28 4c 65 74 | 28 46 46 2c 47 47 29 29 |l$=.(Let|(FF,GG))|
|00003cb0| 2b 6d 24 0d 14 4e 06 20 | cd 0d 14 4f 3b 20 74 74 |+m$..N. |...O; tt|
|00003cc0| 70 24 3d c1 6d 24 2c 31 | 2c 34 29 3a e7 20 a7 74 |p$=.m$,1|,4):. .t|
|00003cd0| 74 70 24 2c 22 2e 22 29 | 20 6d 24 3d 22 30 31 22 |tp$,".")| m$="01"|
|00003ce0| 3a 6c 24 3d bd 28 4c 65 | 74 28 46 46 2c 47 47 29 |:l$=.(Le|t(FF,GG)|
|00003cf0| 29 2b 6d 24 0d 14 50 2b | 20 f2 66 69 6c 65 5f 73 |)+m$..P+| .file_s|
|00003d00| 63 61 6e 28 6c 24 29 3a | 71 5f 6f 6c 64 24 3d 6c |can(l$):|q_old$=l|
|00003d10| 24 3a 6c 3d a7 74 65 78 | 74 24 2c 22 2f 22 29 0d |$:l=.tex|t$,"/").|
|00003d20| 14 64 39 20 6b 6f 72 24 | 3d c0 74 65 78 74 24 2c |.d9 kor$|=.text$,|
|00003d30| 6c 2d 31 29 3a 74 65 78 | 74 24 3d c2 74 65 78 74 |l-1):tex|t$=.text|
|00003d40| 24 2c a9 74 65 78 74 24 | 2d 6c 29 3a 71 75 65 73 |$,.text$|-l):ques|
|00003d50| 74 24 3d 74 65 78 74 24 | 0d 14 6e 38 20 71 75 65 |t$=text$|..n8 que|
|00003d60| 73 74 24 3d 22 57 68 61 | 74 20 22 2b bd 28 6b 65 |st$="Wha|t "+.(ke|
|00003d70| 79 29 2b 22 20 22 2b 71 | 75 65 73 74 24 2b 22 3f |y)+" "+q|uest$+"?|
|00003d80| 22 3a 74 72 75 65 5f 61 | 6e 73 24 3d 6b 6f 72 24 |":true_a|ns$=kor$|
|00003d90| 0d 14 82 12 20 e3 20 46 | 3d 31 20 b8 20 a9 6b 6f |.... . F|=1 . .ko|
|00003da0| 72 24 0d 14 8c 15 20 20 | 6c 3d 97 28 c1 6b 6f 72 |r$.... |l=.(.kor|
|00003db0| 24 2c 46 2c 31 29 29 0d | 14 96 35 20 20 e7 20 6c |$,F,1)).|..5 . l|
|00003dc0| 3e 39 30 20 6b 6f 72 24 | 3d c0 6b 6f 72 24 2c 46 |>90 kor$|=.kor$,F|
|00003dd0| 2d 31 29 2b bd 28 6c 2d | 33 32 29 2b c2 6b 6f 72 |-1)+.(l-|32)+.kor|
|00003de0| 24 2c 28 a9 6b 6f 72 24 | 29 2d 46 29 0d 14 a0 06 |$,(.kor$|)-F)....|
|00003df0| 20 ed 0d 14 aa 06 20 e1 | 0d 14 b4 10 20 f4 2d 2d | ..... .|.... .--|
|00003e00| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 14 be 11 20 dd f2 65 |--------|.... ..e|
|00003e10| 64 69 74 5f 6d 6f 75 73 | 65 0d 14 c8 27 20 78 25 |dit_mous|e...' x%|
|00003e20| 3d 21 62 6c 6f 63 6b 25 | 3a 79 25 3d 62 6c 6f 63 |=!block%|:y%=bloc|
|00003e30| 6b 25 21 34 3a 62 75 3d | 62 6c 6f 63 6b 25 21 38 |k%!4:bu=|block%!8|
|00003e40| 0d 14 d2 14 20 e7 20 62 | 75 3d 31 20 65 6e 64 25 |.... . b|u=1 end%|
|00003e50| 3d b9 3a e1 0d 14 dc 06 | 20 e1 0d 14 e6 10 20 f4 |=.:.....| ..... .|
|00003e60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 14 f0 0e 20 dd |--------|--.... .|
|00003e70| f2 64 6f 5f 67 61 6d 65 | 0d 14 fa 1a 20 6d 3d b3 |.do_game|.... m=.|
|00003e80| 28 2d 91 29 3a 74 6f 74 | 61 6c 5f 67 61 6d 65 73 |(-.):tot|al_games|
|00003e90| 3d 30 0d 15 04 16 20 e7 | 20 74 6f 74 61 6c 5f 67 |=0.... .| total_g|
|00003ea0| 61 6d 65 73 3d 36 20 e1 | 0d 15 0e 20 20 f5 3a 6d |ames=6 .|... .:m|
|00003eb0| 6d 3d b3 28 61 72 5f 6c | 69 6d 25 29 3a fd 20 41 |m=.(ar_l|im%):. A|
|00003ec0| 72 32 28 6d 6d 29 3e 30 | 0d 15 18 29 20 f2 71 75 |r2(mm)>0|...) .qu|
|00003ed0| 65 73 74 69 6f 6e 28 41 | 72 28 6d 6d 29 29 3a 41 |estion(A|r(mm)):A|
|00003ee0| 72 32 28 6d 6d 29 3d 30 | 3a e7 20 46 46 3d 30 20 |r2(mm)=0|:. FF=0 |
|00003ef0| fa 0d 15 22 2a 20 78 71 | 3d 78 73 74 2b 28 73 2a |..."* xq|=xst+(s*|
|00003f00| 71 72 2f 32 29 2b 28 28 | 46 46 2d 31 29 2a 28 28 |qr/2)+((|FF-1)*((|
|00003f10| 73 2a 71 72 29 2b 73 2f | 32 29 29 0d 15 2c 28 20 |s*qr)+s/|2))..,( |
|00003f20| 79 71 3d 79 73 74 2b 28 | 73 2a 30 2e 38 36 36 29 |yq=yst+(|s*0.866)|
|00003f30| 2b 28 47 47 2d 31 29 2a | 28 32 2a 73 2a 30 2e 38 |+(GG-1)*|(2*s*0.8|
|00003f40| 36 36 29 0d 15 36 21 20 | e7 20 28 46 46 2d 31 29 |66)..6! |. (FF-1)|
|00003f50| 20 83 20 32 3d 31 20 79 | 71 2b 3d 28 73 2a 30 2e | . 2=1 y|q+=(s*0.|
|00003f60| 38 36 36 29 0d 15 40 17 | 20 e3 20 54 3d 31 20 b8 |866)..@.| . T=1 .|
|00003f70| 20 34 3a f2 66 6c 61 73 | 68 3a ed 0d 15 4a 04 0d | 4:.flas|h:...J..|
|00003f80| 15 54 0b 20 f2 63 61 72 | 64 32 0d 15 59 0f 20 e7 |.T. .car|d2..Y. .|
|00003f90| 20 74 72 69 70 3d a3 20 | 8c 0d 15 5e 2c 20 20 c8 | trip=. |...^, .|
|00003fa0| 99 22 4f 53 5f 52 65 61 | 64 4d 6f 6e 6f 74 6f 6e |."OS_Rea|dMonoton|
|00003fb0| 69 63 54 69 6d 65 22 20 | b8 20 73 74 61 72 74 5f |icTime" |. start_|
|00003fc0| 74 69 6d 65 25 0d 15 68 | 07 20 20 f5 0d 15 72 2b |time%..h|. ...r+|
|00003fd0| 20 20 20 c8 99 22 4f 53 | 5f 52 65 61 64 4d 6f 6e | .."OS|_ReadMon|
|00003fe0| 6f 74 6f 6e 69 63 54 69 | 6d 65 22 20 b8 20 6e 6f |otonicTi|me" . no|
|00003ff0| 77 5f 74 69 6d 65 25 0d | 15 7c 50 20 20 fd 20 a6 |w_time%.|.|P . .|
|00004000| 28 2d 36 29 20 84 20 a6 | 28 2d 39 29 20 84 20 a6 |(-6) . .|(-9) . .|
|00004010| 28 2d 31 30 37 29 20 84 | 20 a6 28 2d 39 39 29 20 |(-107) .| .(-99) |
|00004020| 84 20 a6 28 2d 31 31 33 | 29 20 84 20 28 6e 6f 77 |. .(-113|) . (now|
|00004030| 5f 74 69 6d 65 25 2d 73 | 74 61 72 74 5f 74 69 6d |_time%-s|tart_tim|
|00004040| 65 25 3e 35 30 30 29 0d | 15 86 06 20 cd 0d 15 8b |e%>500).|... ....|
|00004050| 04 0d 15 90 17 20 e7 20 | a6 28 2d 31 31 33 29 20 |..... . |.(-113) |
|00004060| 65 6e 64 25 3d b9 3a e1 | 0d 15 9a 04 0d 15 a4 2d |end%=.:.|.......-|
|00004070| 20 e7 20 28 6e 6f 77 5f | 74 69 6d 65 25 2d 73 74 | . (now_|time%-st|
|00004080| 61 72 74 5f 74 69 6d 65 | 25 3e 35 30 30 29 20 80 |art_time|%>500) .|
|00004090| 20 74 72 69 70 3d a3 20 | 8c 0d 15 ae 2f 20 20 f2 | trip=. |..../ .|
|000040a0| 72 65 76 65 61 6c 5f 61 | 6e 73 77 65 72 3a 41 72 |reveal_a|nswer:Ar|
|000040b0| 32 28 6d 6d 29 3d 31 3a | 77 68 69 74 65 25 3d a3 |2(mm)=1:|white%=.|
|000040c0| 3a 62 6c 75 65 25 3d a3 | 0d 15 b8 06 20 cc 0d 15 |:blue%=.|.... ...|
|000040d0| c2 34 20 20 e7 20 a6 28 | 2d 36 29 20 77 68 69 74 |.4 . .(|-6) whit|
|000040e0| 65 25 3d b9 3a 62 6c 75 | 65 25 3d a3 20 8b 20 77 |e%=.:blu|e%=. . w|
|000040f0| 68 69 74 65 25 3d a3 3a | 62 6c 75 65 25 3d b9 3a |hite%=.:|blue%=.:|
|00004100| ef 37 0d 15 cc 1c 20 20 | f2 69 6e 70 75 74 5f 73 |.7.... |.input_s|
|00004110| 63 61 6e 3a f2 70 72 6f | 63 65 73 73 5f 41 0d 15 |can:.pro|cess_A..|
|00004120| d6 16 20 20 e7 20 61 6e | 73 77 65 72 24 3d 6b 6f |.. . an|swer$=ko|
|00004130| 72 24 20 8c 0d 15 e0 34 | 20 20 20 e7 20 77 68 69 |r$ ....4| . whi|
|00004140| 74 65 25 3d b9 20 f2 66 | 69 6c 6c 5f 6f 6e 65 28 |te%=. .f|ill_one(|
|00004150| 30 2c 46 46 2c 47 47 29 | 3a 77 68 69 74 65 5f 73 |0,FF,GG)|:white_s|
|00004160| 63 6f 72 65 25 2b 3d 35 | 0d 15 ea 33 20 20 20 e7 |core%+=5|...3 .|
|00004170| 20 62 6c 75 65 25 3d b9 | 20 f2 66 69 6c 6c 5f 6f | blue%=.| .fill_o|
|00004180| 6e 65 28 31 35 2c 46 46 | 2c 47 47 29 3a 62 6c 75 |ne(15,FF|,GG):blu|
|00004190| 65 5f 73 63 6f 72 65 25 | 2b 3d 35 0d 15 f4 07 20 |e_score%|+=5.... |
|000041a0| 20 cc 0d 15 fe 10 20 20 | 20 f2 72 6f 75 74 69 6e | ..... | .routin|
|000041b0| 65 31 0d 16 08 07 20 20 | cd 0d 16 12 06 20 cd 0d |e1.... |..... ..|
|000041c0| 16 1c 04 0d 16 26 11 20 | f2 73 68 6f 77 5f 73 63 |.....&. |.show_sc|
|000041d0| 6f 72 65 73 0d 16 30 32 | 20 e7 20 77 68 69 74 65 |ores..02| . white|
|000041e0| 5f 77 6f 6e 25 3d b9 20 | 84 20 62 6c 75 65 5f 77 |_won%=. |. blue_w|
|000041f0| 6f 6e 25 3d b9 20 f2 66 | 69 6e 69 73 68 65 64 3a |on%=. .f|inished:|
|00004200| e5 20 8d 54 44 55 0d 16 | 3a 28 20 e7 20 77 68 69 |. .TDU..|:( . whi|
|00004210| 74 65 25 3d b9 20 84 20 | 62 6c 75 65 25 3d b9 20 |te%=. . |blue%=. |
|00004220| f2 6c 65 74 74 65 72 5f | 70 72 6f 6d 70 74 0d 16 |.letter_|prompt..|
|00004230| 44 0b 20 e5 20 8d 54 58 | 55 0d 16 4e 06 20 e1 0d |D. . .TX|U..N. ..|
|00004240| 16 58 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.X. .---|-------.|
|00004250| 16 62 0c 20 dd f2 66 6c | 61 73 68 0d 16 6c 3b 20 |.b. ..fl|ash..l; |
|00004260| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00004270| 72 22 2c 32 3a c8 93 20 | c8 90 20 28 73 63 72 65 |r",2:.. |.. (scre|
|00004280| 65 6e 5f 72 2f 32 29 2d | 33 31 32 2c 34 30 2c 36 |en_r/2)-|312,40,6|
|00004290| 32 30 2c 31 32 30 0d 16 | 76 3d 20 c8 99 22 57 69 |20,120..|v= .."Wi|
|000042a0| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 39 3a |mp_SetCo|lour",9:|
|000042b0| c8 8f 20 c8 90 20 78 71 | 2c 79 71 2c 33 32 3a c8 |.. .. xq|,yq,32:.|
|000042c0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|000042d0| 22 2c 36 0d 16 80 21 20 | 61 25 3d b0 78 71 2c 79 |",6...! |a%=.xq,y|
|000042e0| 71 29 3a e6 20 31 32 38 | 2b 61 25 3a c8 90 20 78 |q):. 128|+a%:.. x|
|000042f0| 71 2c 79 71 0d 16 8a 13 | 20 e3 20 52 3d 31 20 b8 |q,yq....| . R=1 .|
|00004300| 20 38 30 30 30 3a ed 0d | 16 94 36 20 c8 99 22 57 | 8000:..|..6 .."W|
|00004310| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 39 |imp_SetC|olour",9|
|00004320| 3a 61 25 3d b0 78 71 2c | 79 71 29 3a e6 20 31 32 |:a%=.xq,|yq):. 12|
|00004330| 38 2b 61 25 3a c8 90 20 | 78 71 2c 79 71 0d 16 9e |8+a%:.. |xq,yq...|
|00004340| 2d 20 f2 70 69 63 74 75 | 72 65 28 33 32 2a 73 6b |- .pictu|re(32*sk|
|00004350| 6c 32 2c 35 32 2a 73 6b | 6c 2c 69 63 6f 6e 73 2c |l2,52*sk|l,icons,|
|00004360| bd 28 41 72 28 6d 6d 29 | 29 29 0d 16 a8 4a 20 c8 |.(Ar(mm)|))...J .|
|00004370| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 35 |."OS_Spr|iteOp",5|
|00004380| 36 34 2c 69 63 6f 6e 73 | 2c 61 64 64 25 2c 78 71 |64,icons|,add%,xq|
|00004390| 2d 28 73 78 25 2f 32 29 | 2c 79 71 2d 28 73 79 25 |-(sx%/2)|,yq-(sy%|
|000043a0| 2f 32 29 2c 26 30 38 2c | 6d 61 67 25 2c 74 72 61 |/2),&08,|mag%,tra|
|000043b0| 6e 73 32 25 0d 16 bc 13 | 20 e3 20 52 3d 31 20 b8 |ns2%....| . R=1 .|
|000043c0| 20 38 30 30 30 3a ed 0d | 16 c6 06 20 e1 0d 16 d0 | 8000:..|... ....|
|000043d0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 16 da |. .-----|-----...|
|000043e0| 0b 20 dd f2 63 61 72 64 | 0d 16 e4 27 20 c8 99 22 |. ..card|...' .."|
|000043f0| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00004400| 30 3a 78 78 3d 73 63 72 | 65 65 6e 5f 72 2f 32 0d |0:xx=scr|een_r/2.|
|00004410| 16 ee 3c 20 79 79 31 3d | 31 32 36 2a 73 6b 6c 3a |..< yy1=|126*skl:|
|00004420| 79 79 32 3d 31 36 36 2a | 73 6b 6c 3a 79 79 31 3d |yy2=166*|skl:yy1=|
|00004430| 34 2a 28 79 79 31 20 81 | 20 34 29 3a 79 79 32 3d |4*(yy1 .| 4):yy2=|
|00004440| 34 2a 28 79 79 32 20 81 | 20 34 29 0d 16 f8 3e 20 |4*(yy2 .| 4)...> |
|00004450| 78 78 31 3d 34 37 36 2a | 73 6b 6c 32 3a 78 78 32 |xx1=476*|skl2:xx2|
|00004460| 3d 33 32 30 2a 73 6b 6c | 32 3a 78 78 31 3d 34 2a |=320*skl|2:xx1=4*|
|00004470| 28 78 78 31 20 81 20 34 | 29 3a 78 78 32 3d 34 2a |(xx1 . 4|):xx2=4*|
|00004480| 28 78 78 32 20 81 20 34 | 29 0d 17 02 52 20 ec 20 |(xx2 . 4|)...R . |
|00004490| 78 78 2d 78 78 31 2c 79 | 79 31 3a df 20 78 78 2d |xx-xx1,y|y1:. xx-|
|000044a0| 78 78 32 2c 79 79 31 3a | df 20 78 78 2d 78 78 32 |xx2,yy1:|. xx-xx2|
|000044b0| 2c 79 79 32 3a df 20 78 | 78 2b 78 78 32 2c 79 79 |,yy2:. x|x+xx2,yy|
|000044c0| 32 3a df 20 78 78 2b 78 | 78 32 2c 79 79 31 3a df |2:. xx+x|x2,yy1:.|
|000044d0| 20 78 78 2b 78 78 31 2c | 79 79 31 0d 17 06 04 0d | xx+xx1,|yy1.....|
|000044e0| 17 0c 19 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |... .."W|imp_SetC|
|000044f0| 6f 6c 6f 75 72 22 2c 34 | 0d 17 16 6e 20 ec 20 78 |olour",4|...n . x|
|00004500| 78 2d 78 78 31 2c 79 79 | 31 2b 34 3a df 20 78 78 |x-xx1,yy|1+4:. xx|
|00004510| 2d 28 78 78 32 2b 32 29 | 2c 79 79 31 2b 34 3a df |-(xx2+2)|,yy1+4:.|
|00004520| 20 78 78 2d 28 78 78 32 | 2b 32 29 2c 79 79 32 2b | xx-(xx2|+2),yy2+|
|00004530| 34 3a df 20 78 78 2b 28 | 78 78 32 2b 32 29 2c 79 |4:. xx+(|xx2+2),y|
|00004540| 79 32 2b 34 3a df 20 78 | 78 2b 28 78 78 32 2b 32 |y2+4:. x|x+(xx2+2|
|00004550| 29 2c 79 79 31 2b 34 3a | df 20 78 78 2b 78 78 31 |),yy1+4:|. xx+xx1|
|00004560| 2c 79 79 31 2b 34 0d 17 | 20 04 0d 17 2a 37 20 79 |,yy1+4..| ...*7 y|
|00004570| 79 31 3d 33 34 3a 79 79 | 32 3d 31 30 36 2a 73 6b |y1=34:yy|2=106*sk|
|00004580| 6c 3a 79 79 31 3d 34 2a | 28 79 79 31 20 81 20 34 |l:yy1=4*|(yy1 . 4|
|00004590| 29 3a 79 79 32 3d 34 2a | 28 79 79 32 20 81 20 34 |):yy2=4*|(yy2 . 4|
|000045a0| 29 0d 17 34 5e 20 ec 20 | 78 78 2d 78 78 31 2c 79 |)..4^ . |xx-xx1,y|
|000045b0| 79 32 2b 34 3a df 20 78 | 78 2d 78 78 32 2c 79 79 |y2+4:. x|x-xx2,yy|
|000045c0| 32 2b 34 3a df 20 78 78 | 2d 78 78 32 2c 79 79 31 |2+4:. xx|-xx2,yy1|
|000045d0| 2b 34 3a df 20 78 78 2b | 78 78 32 2c 79 79 31 2b |+4:. xx+|xx2,yy1+|
|000045e0| 34 3a df 20 78 78 2b 78 | 78 32 2c 79 79 32 2b 34 |4:. xx+x|x2,yy2+4|
|000045f0| 3a df 20 78 78 2b 78 78 | 31 2c 79 79 32 2b 34 0d |:. xx+xx|1,yy2+4.|
|00004600| 17 3e 19 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |.>. .."W|imp_SetC|
|00004610| 6f 6c 6f 75 72 22 2c 30 | 0d 17 48 62 20 ec 20 78 |olour",0|..Hb . x|
|00004620| 78 2d 78 78 31 2c 79 79 | 32 3a df 20 78 78 2d 28 |x-xx1,yy|2:. xx-(|
|00004630| 78 78 32 2b 32 29 2c 79 | 79 32 3a df 20 78 78 2d |xx2+2),y|y2:. xx-|
|00004640| 28 78 78 32 2b 32 29 2c | 79 79 31 3a df 20 78 78 |(xx2+2),|yy1:. xx|
|00004650| 2b 28 78 78 32 2b 32 29 | 2c 79 79 31 3a df 20 78 |+(xx2+2)|,yy1:. x|
|00004660| 78 2b 28 78 78 32 2b 32 | 29 2c 79 79 32 3a df 20 |x+(xx2+2|),yy2:. |
|00004670| 78 78 2b 78 78 31 2c 79 | 79 32 0d 17 49 04 0d 17 |xx+xx1,y|y2..I...|
|00004680| 4a 2d 20 ec 20 28 38 2a | 73 6b 6c 32 29 2c 79 79 |J- . (8*|skl2),yy|
|00004690| 31 3a df 20 28 38 2a 73 | 6b 6c 32 29 2b 28 31 36 |1:. (8*s|kl2)+(16|
|000046a0| 34 2a 73 6b 6c 32 29 2c | 79 79 31 0d 17 4b 3f 20 |4*skl2),|yy1..K? |
|000046b0| ec 20 73 63 72 65 65 6e | 5f 72 2d 28 38 2a 73 6b |. screen|_r-(8*sk|
|000046c0| 6c 32 29 2c 79 79 31 3a | df 20 73 63 72 65 65 6e |l2),yy1:|. screen|
|000046d0| 5f 72 2d 28 38 2a 73 6b | 6c 32 29 2d 28 31 36 34 |_r-(8*sk|l2)-(164|
|000046e0| 2a 73 6b 6c 32 29 2c 79 | 79 31 0d 17 4c 19 20 c8 |*skl2),y|y1..L. .|
|000046f0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00004700| 22 2c 34 0d 17 4d 31 20 | ec 20 28 38 2a 73 6b 6c |",4..M1 |. (8*skl|
|00004710| 32 29 2c 79 79 31 2b 34 | 3a df 20 28 38 2a 73 6b |2),yy1+4|:. (8*sk|
|00004720| 6c 32 29 2b 28 31 36 34 | 2a 73 6b 6c 32 29 2c 79 |l2)+(164|*skl2),y|
|00004730| 79 31 2b 34 0d 17 4e 43 | 20 ec 20 73 63 72 65 65 |y1+4..NC| . scree|
|00004740| 6e 5f 72 2d 28 38 2a 73 | 6b 6c 32 29 2c 79 79 31 |n_r-(8*s|kl2),yy1|
|00004750| 2b 34 3a df 20 73 63 72 | 65 65 6e 5f 72 2d 28 38 |+4:. scr|een_r-(8|
|00004760| 2a 73 6b 6c 32 29 2d 28 | 31 36 34 2a 73 6b 6c 32 |*skl2)-(|164*skl2|
|00004770| 29 2c 79 79 31 2b 34 0d | 17 52 06 20 e1 0d 17 5c |),yy1+4.|.R. ...\|
|00004780| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 17 66 |. .-----|-----..f|
|00004790| 0c 20 dd f2 63 61 72 64 | 32 0d 17 70 0b 20 74 72 |. ..card|2..p. tr|
|000047a0| 69 70 3d a3 0d 17 7a 3b | 20 c8 99 22 57 69 6d 70 |ip=...z;| .."Wimp|
|000047b0| 5f 53 65 74 43 6f 6c 6f | 75 72 22 2c 32 3a c8 93 |_SetColo|ur",2:..|
|000047c0| 20 c8 90 20 28 73 63 72 | 65 65 6e 5f 72 2f 32 29 | .. (scr|een_r/2)|
|000047d0| 2d 33 31 32 2c 34 30 2c | 36 32 30 2c 31 32 30 0d |-312,40,|620,120.|
|000047e0| 17 84 28 20 71 71 31 24 | 3d 22 22 3a 71 71 32 24 |..( qq1$|="":qq2$|
|000047f0| 3d 22 22 3a 71 71 33 24 | 3d 22 22 3a 71 71 31 24 |="":qq3$|="":qq1$|
|00004800| 3d 71 75 65 73 74 24 0d | 17 8e 11 20 e7 20 a9 71 |=quest$.|... . .q|
|00004810| 71 31 24 3e 33 37 20 8c | 0d 17 98 28 20 20 70 3d |q1$>37 .|...( p=|
|00004820| 33 37 3a f5 3a 70 2d 3d | 31 3a fd 20 70 3d 30 20 |37:.:p-=|1:. p=0 |
|00004830| 84 20 c1 71 71 31 24 2c | 70 2c 31 29 3d 22 20 22 |. .qq1$,|p,1)=" "|
|00004840| 0d 17 a2 2b 20 20 71 71 | 32 24 3d c2 71 71 31 24 |...+ qq|2$=.qq1$|
|00004850| 2c 28 a9 71 71 31 24 29 | 2d 70 29 3a 71 71 31 24 |,(.qq1$)|-p):qq1$|
|00004860| 3d c0 71 71 31 24 2c 70 | 2d 31 29 0d 17 ac 06 20 |=.qq1$,p|-1).... |
|00004870| cd 0d 17 b6 11 20 e7 20 | a9 71 71 32 24 3e 33 37 |..... . |.qq2$>37|
|00004880| 20 8c 0d 17 c0 28 20 20 | 70 3d 33 37 3a f5 3a 70 | ....( |p=37:.:p|
|00004890| 2d 3d 31 3a fd 20 70 3d | 30 20 84 20 c1 71 71 32 |-=1:. p=|0 . .qq2|
|000048a0| 24 2c 70 2c 31 29 3d 22 | 20 22 0d 17 ca 2b 20 20 |$,p,1)="| "...+ |
|000048b0| 71 71 33 24 3d c2 71 71 | 32 24 2c 28 a9 71 71 32 |qq3$=.qq|2$,(.qq2|
|000048c0| 24 29 2d 70 29 3a 71 71 | 32 24 3d c0 71 71 32 24 |$)-p):qq|2$=.qq2$|
|000048d0| 2c 70 2d 31 29 0d 17 d4 | 06 20 cd 0d 17 de 04 0d |,p-1)...|. ......|
|000048e0| 17 e8 1a 20 70 3d 31 33 | 32 3a e7 20 a9 71 71 33 |... p=13|2:. .qq3|
|000048f0| 24 3e 30 20 70 2b 3d 31 | 36 0d 17 f2 04 0d 17 fc |$>0 p+=1|6.......|
|00004900| 1c 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |. .."Wim|p_SetCol|
|00004910| 6f 75 72 22 2c 37 3a ef | 35 0d 18 06 4f 20 73 63 |our",7:.|5...O sc|
|00004920| 78 3d 28 73 63 72 65 65 | 6e 5f 72 2f 32 29 2d 28 |x=(scree|n_r/2)-(|
|00004930| 31 36 2a 28 a9 71 71 31 | 24 29 2f 32 29 3a 73 63 |16*(.qq1|$)/2):sc|
|00004940| 79 3d 70 3a 73 63 24 3d | 71 71 31 24 3a f2 73 63 |y=p:sc$=|qq1$:.sc|
|00004950| 72 6f 6c 6c 3a 70 2d 3d | 33 36 3a e7 20 74 72 69 |roll:p-=|36:. tri|
|00004960| 70 3d b9 20 ef 34 3a e1 | 0d 18 10 59 20 e7 20 a9 |p=. .4:.|...Y . .|
|00004970| 71 71 32 24 3e 30 20 73 | 63 78 3d 28 73 63 72 65 |qq2$>0 s|cx=(scre|
|00004980| 65 6e 5f 72 2f 32 29 2d | 28 31 36 2a 28 a9 71 71 |en_r/2)-|(16*(.qq|
|00004990| 32 24 29 2f 32 29 3a 73 | 63 79 3d 70 3a 73 63 24 |2$)/2):s|cy=p:sc$|
|000049a0| 3d 71 71 32 24 3a f2 73 | 63 72 6f 6c 6c 3a 70 2d |=qq2$:.s|croll:p-|
|000049b0| 3d 33 36 3a e7 20 74 72 | 69 70 3d b9 20 ef 34 3a |=36:. tr|ip=. .4:|
|000049c0| e1 0d 18 1a 45 20 e7 20 | a9 71 71 33 24 3e 30 20 |....E . |.qq3$>0 |
|000049d0| 73 63 78 3d 28 73 63 72 | 65 65 6e 5f 72 2f 32 29 |scx=(scr|een_r/2)|
|000049e0| 2d 28 31 36 2a 28 a9 71 | 71 33 24 29 2f 32 29 3a |-(16*(.q|q3$)/2):|
|000049f0| 73 63 79 3d 70 3a 73 63 | 24 3d 71 71 33 24 3a f2 |scy=p:sc|$=qq3$:.|
|00004a00| 73 63 72 6f 6c 6c 0d 18 | 24 07 20 ef 34 0d 18 2e |scroll..|$. .4...|
|00004a10| 06 20 e1 0d 18 38 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ...8. |.-------|
|00004a20| 2d 2d 2d 0d 18 42 0d 20 | dd f2 73 63 72 6f 6c 6c |---..B. |..scroll|
|00004a30| 0d 18 4c 0f 20 6c 3d 30 | 3a 66 6c 61 67 3d a3 0d |..L. l=0|:flag=..|
|00004a40| 18 56 06 20 f5 0d 18 60 | 26 20 20 f5 3a 6c 2b 3d |.V. ...`|& .:l+=|
|00004a50| 31 3a fd 20 c1 73 63 24 | 2c 6c 2c 31 29 3d 22 20 |1:. .sc$|,l,1)=" |
|00004a60| 22 20 84 20 6c 3e 3d a9 | 73 63 24 0d 18 7e 10 20 |" . l>=.|sc$..~. |
|00004a70| 20 e7 20 6c 3c a9 73 63 | 24 20 8c 0d 18 7f 2b 20 | . l<.sc|$ ....+ |
|00004a80| 20 20 61 3d 97 c0 73 63 | 24 2c 31 29 3a 61 3d 61 | a=..sc|$,1):a=a|
|00004a90| 2a 31 2e 33 3a d4 20 31 | 2c 73 6f 75 6e 64 5f 6c |*1.3:. 1|,sound_l|
|00004aa0| 65 76 2c 61 2c 35 0d 18 | 88 30 20 20 20 ec 20 73 |ev,a,5..|.0 . s|
|00004ab0| 63 78 2c 73 63 79 3a f1 | c0 73 63 24 2c 6c 29 2b |cx,scy:.|.sc$,l)+|
|00004ac0| 22 20 22 3a 73 63 78 2b | 3d 31 36 2a 28 a9 c0 73 |" ":scx+|=16*(..s|
|00004ad0| 63 24 2c 6c 29 29 0d 18 | 92 1b 20 20 20 73 63 24 |c$,l))..|.. sc$|
|00004ae0| 3d c2 73 63 24 2c a9 73 | 63 24 2d 6c 29 3a 6c 3d |=.sc$,.s|c$-l):l=|
|00004af0| 30 0d 18 9c 07 20 20 cc | 0d 18 9e 2b 20 20 20 61 |0.... .|...+ a|
|00004b00| 3d 97 c0 73 63 24 2c 31 | 29 3a 61 3d 61 2a 31 2e |=..sc$,1|):a=a*1.|
|00004b10| 33 3a d4 20 31 2c 73 6f | 75 6e 64 5f 6c 65 76 2c |3:. 1,so|und_lev,|
|00004b20| 61 2c 35 0d 18 a6 1c 20 | 20 20 ec 20 73 63 78 2c |a,5.... | . scx,|
|00004b30| 73 63 79 3a f1 73 63 24 | 3a 66 6c 61 67 3d b9 0d |scy:.sc$|:flag=..|
|00004b40| 18 b0 07 20 20 cd 0d 18 | ba 11 20 20 e3 20 46 3d |... ...|.. . F=|
|00004b50| 31 20 b8 20 38 30 30 0d | 18 c4 5a 20 20 20 e7 20 |1 . 800.|..Z . |
|00004b60| 28 a6 28 2d 36 29 20 84 | 20 a6 28 2d 39 29 20 84 |(.(-6) .| .(-9) .|
|00004b70| 20 a6 28 2d 31 30 37 29 | 20 84 20 a6 28 2d 31 31 | .(-107)| . .(-11|
|00004b80| 33 29 29 20 6e 6f 77 5f | 74 69 6d 65 25 3d 31 3a |3)) now_|time%=1:|
|00004b90| 73 74 61 72 74 5f 74 69 | 6d 65 25 3d 30 3a 74 72 |start_ti|me%=0:tr|
|00004ba0| 69 70 3d b9 3a 46 3d 38 | 30 30 3a 66 6c 61 67 3d |ip=.:F=8|00:flag=|
|00004bb0| b9 0d 18 ce 07 20 20 ed | 0d 18 d8 0d 20 fd 20 66 |..... .|.... . f|
|00004bc0| 6c 61 67 3d b9 0d 18 e2 | 06 20 e1 0d 18 ec 10 20 |lag=....|. ..... |
|00004bd0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 18 f6 14 20 |.-------|---.... |
|00004be0| dd f2 72 65 76 65 61 6c | 5f 61 6e 73 77 65 72 0d |..reveal|_answer.|
|00004bf0| 19 00 3b 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |..; .."W|imp_SetC|
|00004c00| 6f 6c 6f 75 72 22 2c 32 | 3a c8 93 20 c8 90 20 28 |olour",2|:.. .. (|
|00004c10| 73 63 72 65 65 6e 5f 72 | 2f 32 29 2d 33 31 32 2c |screen_r|/2)-312,|
|00004c20| 34 30 2c 36 32 30 2c 31 | 32 30 0d 19 0a 1f 20 ef |40,620,1|20.... .|
|00004c30| 37 3a c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |7:.."Wim|p_SetCol|
|00004c40| 6f 75 72 22 2c 37 3a ef | 35 0d 19 14 36 20 ec 20 |our",7:.|5...6 . |
|00004c50| 28 73 63 72 65 65 6e 5f | 72 2f 32 29 2d 28 31 36 |(screen_|r/2)-(16|
|00004c60| 2a 28 a9 74 72 75 65 5f | 61 6e 73 24 29 2f 32 29 |*(.true_|ans$)/2)|
|00004c70| 2c 31 32 38 3a f1 74 72 | 75 65 5f 61 6e 73 24 0d |,128:.tr|ue_ans$.|
|00004c80| 19 1e 14 20 e3 20 54 3d | 31 20 b8 20 37 30 30 30 |... . T=|1 . 7000|
|00004c90| 30 3a ed 0d 19 28 3b 20 | c8 99 22 57 69 6d 70 5f |0:...(; |.."Wimp_|
|00004ca0| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 32 3a c8 93 20 |SetColou|r",2:.. |
|00004cb0| c8 90 20 28 73 63 72 65 | 65 6e 5f 72 2f 32 29 2d |.. (scre|en_r/2)-|
|00004cc0| 33 31 32 2c 34 30 2c 36 | 32 30 2c 31 32 30 0d 19 |312,40,6|20,120..|
|00004cd0| 32 06 20 e1 0d 19 3c 10 | 20 f4 2d 2d 2d 2d 2d 2d |2. ...<.| .------|
|00004ce0| 2d 2d 2d 2d 0d 19 46 12 | 20 dd f2 73 68 6f 77 5f |----..F.| ..show_|
|00004cf0| 73 63 6f 72 65 73 0d 19 | 50 2f 20 63 31 3d 28 73 |scores..|P/ c1=(s|
|00004d00| 63 72 65 65 6e 5f 72 29 | 2f 32 2d 28 34 35 32 2a |creen_r)|/2-(452*|
|00004d10| 73 6b 6c 32 29 3a 77 68 | 3d 77 68 69 74 65 5f 73 |skl2):wh|=white_s|
|00004d20| 63 6f 72 65 25 0d 19 5a | 1c 20 6a 31 3d 33 32 2a |core%..Z|. j1=32*|
|00004d30| 73 6b 6c 32 3a 6b 31 3d | 35 32 2a 73 6b 6c 2a 31 |skl2:k1=|52*skl*1|
|00004d40| 30 0d 19 64 20 20 6a 31 | 3d 32 2a 28 6a 31 20 81 |0..d j1|=2*(j1 .|
|00004d50| 20 32 29 3a 6b 31 3d 34 | 2a 28 6b 31 20 81 20 34 | 2):k1=4|*(k1 . 4|
|00004d60| 29 0d 19 6e 33 20 63 3d | a8 28 77 68 2f 31 30 30 |)..n3 c=|.(wh/100|
|00004d70| 29 3a f2 70 69 63 74 75 | 72 65 28 6a 31 2c 6b 31 |):.pictu|re(j1,k1|
|00004d80| 2c 69 63 6f 6e 73 2c c3 | 63 29 3a 77 68 2d 3d 31 |,icons,.|c):wh-=1|
|00004d90| 30 30 2a 63 0d 19 78 44 | 20 c8 99 22 4f 53 5f 53 |00*c..xD| .."OS_S|
|00004da0| 70 72 69 74 65 4f 70 22 | 2c 35 36 34 2c 69 63 6f |priteOp"|,564,ico|
|00004db0| 6e 73 2c 61 64 64 25 2c | 63 31 2c 33 34 2c 30 2c |ns,add%,|c1,34,0,|
|00004dc0| 6d 61 67 25 2c 74 72 61 | 6e 73 32 25 3a 63 31 2b |mag%,tra|ns2%:c1+|
|00004dd0| 3d 34 30 2a 73 6b 6c 32 | 0d 19 82 31 20 63 3d a8 |=40*skl2|...1 c=.|
|00004de0| 28 77 68 2f 31 30 29 3a | f2 70 69 63 74 75 72 65 |(wh/10):|.picture|
|00004df0| 28 6a 31 2c 6b 31 2c 69 | 63 6f 6e 73 2c c3 63 29 |(j1,k1,i|cons,.c)|
|00004e00| 3a 77 68 2d 3d 31 30 2a | 63 0d 19 8c 44 20 c8 99 |:wh-=10*|c...D ..|
|00004e10| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 35 36 |"OS_Spri|teOp",56|
|00004e20| 34 2c 69 63 6f 6e 73 2c | 61 64 64 25 2c 63 31 2c |4,icons,|add%,c1,|
|00004e30| 33 34 2c 30 2c 6d 61 67 | 25 2c 74 72 61 6e 73 32 |34,0,mag|%,trans2|
|00004e40| 25 3a 63 31 2b 3d 34 30 | 2a 73 6b 6c 32 0d 19 96 |%:c1+=40|*skl2...|
|00004e50| 22 20 63 3d 77 68 3a f2 | 70 69 63 74 75 72 65 28 |" c=wh:.|picture(|
|00004e60| 6a 31 2c 6b 31 2c 69 63 | 6f 6e 73 2c c3 63 29 0d |j1,k1,ic|ons,.c).|
|00004e70| 19 a0 38 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |..8 .."O|S_Sprite|
|00004e80| 4f 70 22 2c 35 36 34 2c | 69 63 6f 6e 73 2c 61 64 |Op",564,|icons,ad|
|00004e90| 64 25 2c 63 31 2c 33 34 | 2c 30 2c 6d 61 67 25 2c |d%,c1,34|,0,mag%,|
|00004ea0| 74 72 61 6e 73 32 25 0d | 19 aa 04 0d 19 b4 2e 20 |trans2%.|....... |
|00004eb0| 63 32 3d 28 73 63 72 65 | 65 6e 5f 72 29 2f 32 2b |c2=(scre|en_r)/2+|
|00004ec0| 28 33 34 30 2a 73 6b 6c | 32 29 3a 77 68 3d 62 6c |(340*skl|2):wh=bl|
|00004ed0| 75 65 5f 73 63 6f 72 65 | 25 0d 19 be 33 20 63 3d |ue_score|%...3 c=|
|00004ee0| a8 28 77 68 2f 31 30 30 | 29 3a f2 70 69 63 74 75 |.(wh/100|):.pictu|
|00004ef0| 72 65 28 6a 31 2c 6b 31 | 2c 69 63 6f 6e 73 2c c3 |re(j1,k1|,icons,.|
|00004f00| 63 29 3a 77 68 2d 3d 31 | 30 30 2a 63 0d 19 c8 44 |c):wh-=1|00*c...D|
|00004f10| 20 c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 | .."OS_S|priteOp"|
|00004f20| 2c 35 36 34 2c 69 63 6f | 6e 73 2c 61 64 64 25 2c |,564,ico|ns,add%,|
|00004f30| 63 32 2c 33 34 2c 30 2c | 6d 61 67 25 2c 74 72 61 |c2,34,0,|mag%,tra|
|00004f40| 6e 73 32 25 3a 63 32 2b | 3d 34 30 2a 73 6b 6c 32 |ns2%:c2+|=40*skl2|
|00004f50| 0d 19 d2 31 20 63 3d a8 | 28 77 68 2f 31 30 29 3a |...1 c=.|(wh/10):|
|00004f60| f2 70 69 63 74 75 72 65 | 28 6a 31 2c 6b 31 2c 69 |.picture|(j1,k1,i|
|00004f70| 63 6f 6e 73 2c c3 63 29 | 3a 77 68 2d 3d 31 30 2a |cons,.c)|:wh-=10*|
|00004f80| 63 0d 19 dc 44 20 c8 99 | 22 4f 53 5f 53 70 72 69 |c...D ..|"OS_Spri|
|00004f90| 74 65 4f 70 22 2c 35 36 | 34 2c 69 63 6f 6e 73 2c |teOp",56|4,icons,|
|00004fa0| 61 64 64 25 2c 63 32 2c | 33 34 2c 30 2c 6d 61 67 |add%,c2,|34,0,mag|
|00004fb0| 25 2c 74 72 61 6e 73 32 | 25 3a 63 32 2b 3d 34 30 |%,trans2|%:c2+=40|
|00004fc0| 2a 73 6b 6c 32 0d 19 e6 | 22 20 63 3d 77 68 3a f2 |*skl2...|" c=wh:.|
|00004fd0| 70 69 63 74 75 72 65 28 | 6a 31 2c 6b 31 2c 69 63 |picture(|j1,k1,ic|
|00004fe0| 6f 6e 73 2c c3 63 29 0d | 19 f0 38 20 c8 99 22 4f |ons,.c).|..8 .."O|
|00004ff0| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 35 36 34 2c |S_Sprite|Op",564,|
|00005000| 69 63 6f 6e 73 2c 61 64 | 64 25 2c 63 32 2c 33 34 |icons,ad|d%,c2,34|
|00005010| 2c 30 2c 6d 61 67 25 2c | 74 72 61 6e 73 32 25 0d |,0,mag%,|trans2%.|
|00005020| 19 fa 04 0d 1a 40 06 20 | e1 0d 1a 4a 10 20 f4 2d |.....@. |...J. .-|
|00005030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 1a 54 14 20 dd f2 |--------|-..T. ..|
|00005040| 6c 65 74 74 65 72 5f 70 | 72 6f 6d 70 74 0d 1a 5e |letter_p|rompt..^|
|00005050| 3b 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |; .."Wim|p_SetCol|
|00005060| 6f 75 72 22 2c 32 3a c8 | 93 20 c8 90 20 28 73 63 |our",2:.|. .. (sc|
|00005070| 72 65 65 6e 5f 72 2f 32 | 29 2d 33 31 32 2c 34 30 |reen_r/2|)-312,40|
|00005080| 2c 36 32 30 2c 31 32 30 | 0d 1a 68 1c 20 ef 35 3a |,620,120|..h. .5:|
|00005090| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|000050a0| 72 22 2c 37 0d 1a 72 4f | 20 e7 20 77 68 69 74 65 |r",7..rO| . white|
|000050b0| 25 3d b9 20 ec 20 28 73 | 63 72 65 65 6e 5f 72 2f |%=. . (s|creen_r/|
|000050c0| 32 29 2d 28 31 36 2a 33 | 31 29 2f 32 2c 31 32 30 |2)-(16*3|1)/2,120|
|000050d0| 3a f1 22 57 68 69 74 65 | 20 70 6c 61 79 65 72 20 |:."White| player |
|000050e0| 63 68 6f 6f 73 65 20 6e | 65 78 74 20 6c 65 74 74 |choose n|ext lett|
|000050f0| 65 72 22 0d 1a 7c 4b 20 | e7 20 62 6c 75 65 25 3d |er"..|K |. blue%=|
|00005100| b9 20 ec 20 28 73 63 72 | 65 65 6e 5f 72 2f 32 29 |. . (scr|een_r/2)|
|00005110| 2d 28 31 36 2a 32 38 29 | 2f 32 2c 31 32 30 3a f1 |-(16*28)|/2,120:.|
|00005120| 22 42 6c 75 65 20 74 65 | 61 6d 20 63 68 6f 6f 73 |"Blue te|am choos|
|00005130| 65 20 6e 65 78 74 20 6c | 65 74 74 65 72 22 0d 1a |e next l|etter"..|
|00005140| 86 07 20 ef 34 0d 1a 90 | 0f 20 5a 24 3d be 3a 5a |.. .4...|. Z$=.:Z|
|00005150| 3d 97 5a 24 0d 1a 9a 2a | 20 e7 20 5a 3e 39 30 20 |=.Z$...*| . Z>90 |
|00005160| 5a 3d 5a 2d 33 32 3a e7 | 20 5a 3c 36 35 20 84 20 |Z=Z-32:.| Z<65 . |
|00005170| 5a 3e 39 30 20 ef 37 3a | e5 20 8d 74 50 5a 0d 1a |Z>90 .7:|. .tPZ..|
|00005180| a4 0a 20 6d 6d 3d 2d 31 | 0d 1a ae 14 20 e3 20 46 |.. mm=-1|.... . F|
|00005190| 3d 31 20 b8 20 61 72 5f | 6c 69 6d 25 0d 1a b8 1f |=1 . ar_|lim%....|
|000051a0| 20 20 e7 20 41 72 28 46 | 29 3d 5a 20 80 20 41 72 | . Ar(F|)=Z . Ar|
|000051b0| 32 28 46 29 3d 31 20 6d | 6d 3d 46 0d 1a c2 06 20 |2(F)=1 m|m=F.... |
|000051c0| ed 0d 1a cc 16 20 e7 20 | 6d 6d 3d 2d 31 20 ef 37 |..... . |mm=-1 .7|
|000051d0| 3a e5 20 8d 74 50 5a 0d | 1a d6 06 20 e1 0d 1a e0 |:. .tPZ.|... ....|
|000051e0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1a ea |. .-----|-----...|
|000051f0| 20 20 dd f2 74 65 78 74 | 62 6f 78 32 28 62 78 25 | ..text|box2(bx%|
|00005200| 2c 62 79 25 2c 77 64 25 | 2c 68 74 25 29 0d 1a f4 |,by%,wd%|,ht%)...|
|00005210| 2f 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |/ .."Wim|p_SetCol|
|00005220| 6f 75 72 22 2c 30 3a c8 | 93 20 c8 90 20 62 78 25 |our",0:.|. .. bx%|
|00005230| 2c 62 79 25 2c 77 64 25 | 2c 68 74 25 0d 1a fe 37 |,by%,wd%|,ht%...7|
|00005240| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|00005250| 75 72 22 2c 32 3a c8 93 | 20 c8 90 20 62 78 25 2b |ur",2:..| .. bx%+|
|00005260| 34 2c 62 79 25 2b 34 2c | 77 64 25 2d 38 2c 68 74 |4,by%+4,|wd%-8,ht|
|00005270| 25 2d 38 0d 1b 08 19 20 | c8 99 22 57 69 6d 70 5f |%-8.... |.."Wimp_|
|00005280| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 34 0d 1b 12 1c |SetColou|r",4....|
|00005290| 20 c8 93 20 c8 90 20 62 | 78 25 2c 62 79 25 2b 32 | .. .. b|x%,by%+2|
|000052a0| 2c 32 2c 68 74 25 2d 32 | 0d 1b 1c 20 20 c8 93 20 |,2,ht%-2|... .. |
|000052b0| c8 90 20 62 78 25 2c 62 | 79 25 2b 68 74 25 2d 32 |.. bx%,b|y%+ht%-2|
|000052c0| 2c 77 64 25 2d 32 2c 32 | 0d 1b 26 2b 20 ec 20 62 |,wd%-2,2|..&+ . b|
|000052d0| 78 25 2c 62 79 25 3a ec | 20 62 78 25 2c 62 79 25 |x%,by%:.| bx%,by%|
|000052e0| 2b 32 3a f0 20 38 35 2c | 62 78 25 2b 32 2c 62 79 |+2:. 85,|bx%+2,by|
|000052f0| 25 2b 32 0d 1b 30 43 20 | ec 20 62 78 25 2b 77 64 |%+2..0C |. bx%+wd|
|00005300| 25 2c 62 79 25 2b 68 74 | 25 3a ec 20 62 78 25 2b |%,by%+ht|%:. bx%+|
|00005310| 77 64 25 2d 32 2c 62 79 | 25 2b 68 74 25 3a f0 20 |wd%-2,by|%+ht%:. |
|00005320| 38 35 2c 62 78 25 2b 77 | 64 25 2d 32 2c 62 79 25 |85,bx%+w|d%-2,by%|
|00005330| 2b 68 74 25 2d 32 0d 1b | 3a 06 20 e1 0d 1b 44 10 |+ht%-2..|:. ...D.|
|00005340| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 1b 4e 1f | .------|----..N.|
|00005350| 20 dd f2 70 6c 69 6e 62 | 6f 78 28 62 78 25 2c 62 | ..plinb|ox(bx%,b|
|00005360| 79 25 2c 77 64 25 2c 68 | 74 25 29 0d 1b 58 2f 20 |y%,wd%,h|t%)..X/ |
|00005370| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00005380| 72 22 2c 34 3a c8 93 20 | c8 90 20 62 78 25 2c 62 |r",4:.. |.. bx%,b|
|00005390| 79 25 2c 77 64 25 2c 68 | 74 25 0d 1b 62 37 20 c8 |y%,wd%,h|t%..b7 .|
|000053a0| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|000053b0| 22 2c 32 3a c8 93 20 c8 | 90 20 62 78 25 2b 34 2c |",2:.. .|. bx%+4,|
|000053c0| 62 79 25 2b 34 2c 77 64 | 25 2d 38 2c 68 74 25 2d |by%+4,wd|%-8,ht%-|
|000053d0| 38 0d 1b 6c 19 20 c8 99 | 22 57 69 6d 70 5f 53 65 |8..l. ..|"Wimp_Se|
|000053e0| 74 43 6f 6c 6f 75 72 22 | 2c 30 0d 1b 76 1c 20 c8 |tColour"|,0..v. .|
|000053f0| 93 20 c8 90 20 62 78 25 | 2c 62 79 25 2b 32 2c 32 |. .. bx%|,by%+2,2|
|00005400| 2c 68 74 25 2d 32 0d 1b | 80 20 20 c8 93 20 c8 90 |,ht%-2..|. .. ..|
|00005410| 20 62 78 25 2c 62 79 25 | 2b 68 74 25 2d 32 2c 77 | bx%,by%|+ht%-2,w|
|00005420| 64 25 2d 32 2c 32 0d 1b | 8a 2b 20 ec 20 62 78 25 |d%-2,2..|.+ . bx%|
|00005430| 2c 62 79 25 3a ec 20 62 | 78 25 2c 62 79 25 2b 32 |,by%:. b|x%,by%+2|
|00005440| 3a f0 20 38 35 2c 62 78 | 25 2b 32 2c 62 79 25 2b |:. 85,bx|%+2,by%+|
|00005450| 32 0d 1b 94 43 20 ec 20 | 62 78 25 2b 77 64 25 2c |2...C . |bx%+wd%,|
|00005460| 62 79 25 2b 68 74 25 3a | ec 20 62 78 25 2b 77 64 |by%+ht%:|. bx%+wd|
|00005470| 25 2d 32 2c 62 79 25 2b | 68 74 25 3a f0 20 38 35 |%-2,by%+|ht%:. 85|
|00005480| 2c 62 78 25 2b 77 64 25 | 2d 32 2c 62 79 25 2b 68 |,bx%+wd%|-2,by%+h|
|00005490| 74 25 2d 32 0d 1b 9e 06 | 20 e1 0d 1b a8 10 20 f4 |t%-2....| ..... .|
|000054a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 1b b2 0f 20 dd |--------|--.... .|
|000054b0| f2 66 69 6e 69 73 68 65 | 64 0d 1b bc 10 20 ef 37 |.finishe|d.... .7|
|000054c0| 3a ef 37 3a ef 37 3a ef | 37 0d 1b da 4e 20 e7 20 |:.7:.7:.|7...N . |
|000054d0| 77 68 69 74 65 5f 77 6f | 6e 25 3d b9 20 77 68 5f |white_wo|n%=. wh_|
|000054e0| 67 61 6d 65 73 2b 3d 31 | 3a 77 68 69 74 65 5f 73 |games+=1|:white_s|
|000054f0| 63 6f 72 65 25 2b 3d 32 | 30 20 8b 20 62 6c 5f 67 |core%+=2|0 . bl_g|
|00005500| 61 6d 65 73 2b 3d 31 3a | 62 6c 75 65 5f 73 63 6f |ames+=1:|blue_sco|
|00005510| 72 65 25 2b 3d 32 30 0d | 1b e4 46 20 f2 65 6e 64 |re%+=20.|..F .end|
|00005520| 5f 73 65 71 3a 77 68 69 | 74 65 5f 77 6f 6e 25 3d |_seq:whi|te_won%=|
|00005530| a3 3a 62 6c 75 65 5f 77 | 6f 6e 25 3d a3 3a 74 6f |.:blue_w|on%=.:to|
|00005540| 74 61 6c 5f 67 61 6d 65 | 73 2b 3d 31 3a f2 73 65 |tal_game|s+=1:.se|
|00005550| 74 5f 61 72 72 61 79 3a | f2 67 72 69 64 0d 1b e8 |t_array:|.grid...|
|00005560| 16 20 e7 20 74 6f 74 61 | 6c 5f 67 61 6d 65 73 3c |. . tota|l_games<|
|00005570| 35 20 8c 0d 1b ef 1d 20 | 20 c8 99 22 57 69 6d 70 |5 ..... | .."Wimp|
|00005580| 5f 53 65 74 43 6f 6c 6f | 75 72 22 2c 37 3a ef 35 |_SetColo|ur",7:.5|
|00005590| 0d 1b f1 36 20 20 ec 20 | 28 73 63 72 65 65 6e 5f |...6 . |(screen_|
|000055a0| 72 2f 32 29 2d 31 37 36 | 2c 31 33 36 3a f1 22 50 |r/2)-176|,136:."P|
|000055b0| 72 65 73 73 20 61 6e 79 | 20 6b 65 79 20 74 6f 20 |ress any| key to |
|000055c0| 62 65 67 69 6e 22 0d 1b | f2 4a 20 20 61 24 3d 22 |begin"..|.J a$="|
|000055d0| 67 61 6d 65 20 22 2b c3 | 28 74 6f 74 61 6c 5f 67 |game "+.|(total_g|
|000055e0| 61 6d 65 73 2b 31 29 2b | 22 20 6f 66 20 35 22 3a |ames+1)+|" of 5":|
|000055f0| ec 20 28 73 63 72 65 65 | 6e 5f 72 2f 32 29 2d 28 |. (scree|n_r/2)-(|
|00005600| 38 2a a9 61 24 29 2c 39 | 36 3a f1 61 24 3a ef 34 |8*.a$),9|6:.a$:.4|
|00005610| 0d 1b f3 0a 20 20 5a 24 | 3d be 0d 1b f4 3c 20 20 |.... Z$|=....< |
|00005620| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00005630| 72 22 2c 32 3a c8 93 20 | c8 90 20 28 73 63 72 65 |r",2:.. |.. (scre|
|00005640| 65 6e 5f 72 2f 32 29 2d | 33 31 32 2c 34 30 2c 36 |en_r/2)-|312,40,6|
|00005650| 32 30 2c 31 32 30 0d 1b | f6 06 20 cd 0d 1b f8 06 |20,120..|.. .....|
|00005660| 20 e1 0d 1c 02 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00005670| 2d 2d 0d 1c 0c 0d 20 dd | f2 63 68 65 63 6b 32 0d |--.... .|.check2.|
|00005680| 1c 16 27 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |..' .."O|S_Sprite|
|00005690| 4f 70 22 2c 33 31 36 2c | 69 63 6f 6e 73 2c 22 67 |Op",316,|icons,"g|
|000056a0| 72 69 64 22 2c 30 0d 1c | 20 2b 20 c8 99 22 57 69 |rid",0..| + .."Wi|
|000056b0| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 30 3a |mp_SetCo|lour",0:|
|000056c0| c8 93 20 c8 90 20 30 2c | 30 2c 34 30 30 2c 34 30 |.. .. 0,|0,400,40|
|000056d0| 30 0d 1c 2a 29 20 c8 99 | 22 57 69 6d 70 5f 53 65 |0..*) ..|"Wimp_Se|
|000056e0| 74 43 6f 6c 6f 75 72 22 | 2c 37 3a c8 93 20 30 2c |tColour"|,7:.. 0,|
|000056f0| 31 32 2c 32 37 38 2c 32 | 33 34 0d 1c 34 18 20 e3 |12,278,2|34..4. .|
|00005700| 20 46 3d 31 20 b8 20 35 | 3a e3 20 47 3d 31 20 b8 | F=1 . 5|:. G=1 .|
|00005710| 20 34 0d 1c 3e 1d 20 e7 | 20 46 20 83 20 32 3d 30 | 4..>. .| F . 2=0|
|00005720| 20 6f 66 66 3d 32 36 20 | 8b 20 6f 66 66 3d 30 0d | off=26 |. off=0.|
|00005730| 1c 48 2f 20 c8 93 20 31 | 32 2b 28 28 46 2d 31 29 |.H/ .. 1|2+((F-1)|
|00005740| 2a 35 32 29 2c 31 32 2b | 28 28 28 47 2d 31 29 2a |*52),12+|(((G-1)*|
|00005750| 35 32 29 2b 6f 66 66 29 | 2c 35 32 2c 35 32 0d 1c |52)+off)|,52,52..|
|00005760| 52 08 20 ed 3a ed 0d 1c | 5c 19 20 c8 99 22 57 69 |R. .:...|\. .."Wi|
|00005770| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 30 0d |mp_SetCo|lour",0.|
|00005780| 1c 66 04 0d 1c 70 06 20 | f4 0d 1c 7a 18 20 e3 20 |.f...p. |...z. . |
|00005790| 46 3d 31 20 b8 20 35 3a | e3 20 47 3d 31 20 b8 20 |F=1 . 5:|. G=1 . |
|000057a0| 34 0d 1c 84 1d 20 e7 20 | 46 20 83 20 32 3d 30 20 |4.... . |F . 2=0 |
|000057b0| 6f 66 66 3d 32 36 20 8b | 20 6f 66 66 3d 30 0d 1c |off=26 .| off=0..|
|000057c0| 8e 0c 20 e7 20 47 3c 34 | 20 8c 0d 1c 98 25 20 20 |.. . G<4| ....% |
|000057d0| e7 20 67 72 69 64 28 46 | 2c 47 29 3d 32 20 80 20 |. grid(F|,G)=2 . |
|000057e0| 67 72 69 64 28 46 2c 47 | 2b 31 29 3d 32 20 8c 0d |grid(F,G|+1)=2 ..|
|000057f0| 1c a2 35 20 20 20 c8 93 | 20 c8 90 20 31 32 2b 28 |..5 ..| .. 12+(|
|00005800| 28 46 2d 31 29 2a 35 32 | 29 2b 32 30 2c 31 32 2b |(F-1)*52|)+20,12+|
|00005810| 6f 66 66 2b 28 28 47 29 | 2a 35 32 29 2d 38 2c 31 |off+((G)|*52)-8,1|
|00005820| 36 2c 31 36 0d 1c ac 07 | 20 20 cd 0d 1c b6 06 20 |6,16....| ..... |
|00005830| cd 0d 1c c0 0c 20 e7 20 | 46 3d 31 20 8c 0d 1c ca |..... . |F=1 ....|
|00005840| 15 20 20 e7 20 67 72 69 | 64 28 46 2c 47 29 3d 32 |. . gri|d(F,G)=2|
|00005850| 20 8c 0d 1c d4 32 20 20 | 20 c8 93 20 c8 90 20 31 | ....2 | .. .. 1|
|00005860| 32 2b 28 28 46 2d 31 29 | 2a 35 32 29 2d 38 2c 31 |2+((F-1)|*52)-8,1|
|00005870| 32 2b 28 28 47 2d 31 29 | 2a 35 32 29 2b 32 30 2c |2+((G-1)|*52)+20,|
|00005880| 31 36 2c 38 0d 1c de 07 | 20 20 cd 0d 1c e8 06 20 |16,8....| ..... |
|00005890| cd 0d 1c f2 0c 20 e7 20 | 46 3d 35 20 8c 0d 1c fc |..... . |F=5 ....|
|000058a0| 15 20 20 e7 20 67 72 69 | 64 28 46 2c 47 29 3d 32 |. . gri|d(F,G)=2|
|000058b0| 20 8c 0d 1d 06 30 20 20 | 20 c8 93 20 c8 90 20 31 | ....0 | .. .. 1|
|000058c0| 32 2b 28 28 46 29 2a 35 | 32 29 2d 38 2c 31 32 2b |2+((F)*5|2)-8,12+|
|000058d0| 28 28 47 2d 31 29 2a 35 | 32 29 2b 32 30 2c 31 36 |((G-1)*5|2)+20,16|
|000058e0| 2c 38 0d 1d 10 07 20 20 | cd 0d 1d 1a 06 20 cd 0d |,8.... |..... ..|
|000058f0| 1d 24 08 20 ed 3a ed 0d | 1d 2e 04 0d 1d 38 18 20 |.$. .:..|.....8. |
|00005900| e3 20 46 3d 31 20 b8 20 | 34 3a e3 20 47 3d 31 20 |. F=1 . |4:. G=1 |
|00005910| b8 20 34 0d 1d 42 14 20 | e7 20 67 72 69 64 28 46 |. 4..B. |. grid(F|
|00005920| 2c 47 29 3d 32 20 8c 0d | 1d 4c 11 20 20 e7 20 46 |,G)=2 ..|.L. . F|
|00005930| 20 83 20 32 3d 31 20 8c | 0d 1d 56 44 20 20 20 e7 | . 2=1 .|..VD .|
|00005940| 20 67 72 69 64 28 46 2b | 31 2c 47 29 3d 32 20 c8 | grid(F+|1,G)=2 .|
|00005950| 93 20 c8 90 20 31 32 2b | 28 28 46 29 2a 35 32 29 |. .. 12+|((F)*52)|
|00005960| 2d 31 32 2c 31 32 2b 28 | 28 47 29 2a 35 32 29 2b |-12,12+(|(G)*52)+|
|00005970| 6f 66 66 2d 31 38 2c 32 | 34 2c 31 32 0d 1d 60 48 |off-18,2|4,12..`H|
|00005980| 20 20 20 e7 20 67 72 69 | 64 28 46 2b 31 2c 47 2d | . gri|d(F+1,G-|
|00005990| 31 29 3d 32 20 c8 93 20 | c8 90 20 31 32 2b 28 28 |1)=2 .. |.. 12+((|
|000059a0| 46 29 2a 35 32 29 2d 31 | 32 2c 31 32 2b 28 28 47 |F)*52)-1|2,12+((G|
|000059b0| 29 2a 35 32 29 2b 6f 66 | 66 2d 31 38 2d 32 36 2c |)*52)+of|f-18-26,|
|000059c0| 32 34 2c 38 0d 1d 6a 07 | 20 20 cc 0d 1d 74 44 20 |24,8..j.| ...tD |
|000059d0| 20 20 e7 20 67 72 69 64 | 28 46 2b 31 2c 47 29 3d | . grid|(F+1,G)=|
|000059e0| 32 20 c8 93 20 c8 90 20 | 31 32 2b 28 28 46 29 2a |2 .. .. |12+((F)*|
|000059f0| 35 32 29 2d 31 32 2c 31 | 32 2b 28 28 47 29 2a 35 |52)-12,1|2+((G)*5|
|00005a00| 32 29 2b 6f 66 66 2d 31 | 38 2c 32 34 2c 31 32 0d |2)+off-1|8,24,12.|
|00005a10| 1d 7e 4e 20 20 20 e7 20 | 47 3c 34 3a e7 20 67 72 |.~N . |G<4:. gr|
|00005a20| 69 64 28 46 2b 31 2c 47 | 2b 31 29 3d 32 20 c8 93 |id(F+1,G|+1)=2 ..|
|00005a30| 20 c8 90 20 31 32 2b 28 | 28 46 29 2a 35 32 29 2d | .. 12+(|(F)*52)-|
|00005a40| 31 32 2c 31 32 2b 28 28 | 47 29 2a 35 32 29 2b 6f |12,12+((|G)*52)+o|
|00005a50| 66 66 2d 31 38 2b 32 36 | 2c 32 34 2c 38 0d 1d 88 |ff-18+26|,24,8...|
|00005a60| 07 20 20 cd 0d 1d 92 06 | 20 cd 0d 1d 9c 08 20 ed |. .....| ..... .|
|00005a70| 3a ed 0d 1d a6 04 0d 1d | b0 11 20 62 25 3d b0 32 |:.......|.. b%=.2|
|00005a80| 36 30 2c 32 33 30 29 0d | 1d ba 35 20 c8 99 22 57 |60,230).|..5 .."W|
|00005a90| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 31 |imp_SetC|olour",1|
|00005aa0| 31 3a 61 25 3d b0 38 2c | 31 38 29 3a e6 20 31 32 |1:a%=.8,|18):. 12|
|00005ab0| 38 2b 61 25 3a c8 90 20 | 38 2c 31 38 0d 1d c4 32 |8+a%:.. |8,18...2|
|00005ac0| 20 62 6c 75 65 5f 77 6f | 6e 25 3d a3 3a 61 25 3d | blue_wo|n%=.:a%=|
|00005ad0| b0 32 36 30 2c 32 33 30 | 29 3a e7 20 61 25 3c 3e |.260,230|):. a%<>|
|00005ae0| 62 25 20 62 6c 75 65 5f | 77 6f 6e 25 3d b9 0d 1d |b% blue_|won%=...|
|00005af0| ce 22 20 c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |." .."OS|_SpriteO|
|00005b00| 70 22 2c 33 31 36 2c 69 | 63 6f 6e 73 2c 30 2c 31 |p",316,i|cons,0,1|
|00005b10| 0d 1d d8 2f 20 f4 53 59 | 53 22 4f 53 5f 53 70 72 |.../ .SY|S"OS_Spr|
|00005b20| 69 74 65 4f 70 22 2c 32 | 39 30 2c 69 63 6f 6e 73 |iteOp",2|90,icons|
|00005b30| 2c 22 67 72 69 64 22 2c | 39 35 30 2c 38 2c 30 0d |,"grid",|950,8,0.|
|00005b40| 1d e2 06 20 e1 0d 1d ec | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00005b50| 2d 2d 2d 2d 2d 0d 1d f6 | 11 20 dd f2 69 6e 70 75 |-----...|. ..inpu|
|00005b60| 74 5f 73 63 61 6e 0d 1e | 00 3b 20 c8 99 22 57 69 |t_scan..|.; .."Wi|
|00005b70| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 32 3a |mp_SetCo|lour",2:|
|00005b80| c8 93 20 c8 90 20 28 73 | 63 72 65 65 6e 5f 72 2f |.. .. (s|creen_r/|
|00005b90| 32 29 2d 33 31 32 2c 34 | 30 2c 36 32 30 2c 31 32 |2)-312,4|0,620,12|
|00005ba0| 30 0d 1e 0a 1c 20 c8 99 | 22 57 69 6d 70 5f 53 65 |0.... ..|"Wimp_Se|
|00005bb0| 74 43 6f 6c 6f 75 72 22 | 2c 37 3a ef 35 0d 1e 14 |tColour"|,7:.5...|
|00005bc0| 3e 20 e7 20 77 68 69 74 | 65 25 3d b9 20 ec 20 28 |> . whit|e%=. . (|
|00005bd0| 73 63 72 65 65 6e 5f 72 | 2f 32 29 2d 31 35 32 2c |screen_r|/2)-152,|
|00005be0| 31 33 36 3a f1 22 57 68 | 69 74 65 20 70 6c 61 79 |136:."Wh|ite play|
|00005bf0| 65 72 20 61 6e 73 77 65 | 72 3a 22 0d 1e 1e 3a 20 |er answe|r:"...: |
|00005c00| e7 20 62 6c 75 65 25 3d | b9 20 ec 20 28 73 63 72 |. blue%=|. . (scr|
|00005c10| 65 65 6e 5f 72 2f 32 29 | 2d 31 33 36 2c 31 33 36 |een_r/2)|-136,136|
|00005c20| 3a f1 22 42 6c 75 65 20 | 74 65 61 6d 20 61 6e 73 |:."Blue |team ans|
|00005c30| 77 65 72 3a 22 0d 1e 28 | 22 20 69 24 3d 22 22 3a |wer:"..(|" i$="":|
|00005c40| 66 6c 61 67 3d a3 3a c8 | 99 22 4f 53 5f 42 79 74 |flag=.:.|."OS_Byt|
|00005c50| 65 22 2c 32 31 2c 30 0d | 1e 32 06 20 f5 0d 1e 3c |e",21,0.|.2. ...<|
|00005c60| 10 20 20 5a 24 3d be 3a | 7a 3d 97 5a 24 0d 1e 46 |. Z$=.:|z=.Z$..F|
|00005c70| 14 20 20 e7 20 7a 3d 31 | 32 37 20 66 6c 61 67 3d |. . z=1|27 flag=|
|00005c80| b9 0d 1e 50 13 20 20 e7 | 20 7a 3d 31 33 20 66 6c |...P. .| z=13 fl|
|00005c90| 61 67 3d b9 0d 1e 5a 29 | 20 20 e7 20 7a 3e 36 34 |ag=...Z)| . z>64|
|00005ca0| 20 80 20 7a 3c 31 32 33 | 3a e7 20 7a 3c 39 31 20 | . z<123|:. z<91 |
|00005cb0| 84 20 7a 3e 39 36 20 66 | 6c 61 67 3d b9 0d 1e 64 |. z>96 f|lag=...d|
|00005cc0| 21 20 20 e7 20 a9 69 24 | 3d 33 30 20 80 20 7a 3c |! . .i$|=30 . z<|
|00005cd0| 3e 31 32 37 20 ef 37 3a | 66 6c 61 67 3d a3 0d 1e |>127 .7:|flag=...|
|00005ce0| 6e 0d 20 fd 20 66 6c 61 | 67 3d b9 0d 1e 78 44 20 |n. . fla|g=...xD |
|00005cf0| e7 20 7a 3d 31 33 20 c8 | 99 22 57 69 6d 70 5f 53 |. z=13 .|."Wimp_S|
|00005d00| 65 74 43 6f 6c 6f 75 72 | 22 2c 32 3a c8 93 20 c8 |etColour|",2:.. .|
|00005d10| 90 20 28 73 63 72 65 65 | 6e 5f 72 2f 32 29 2d 33 |. (scree|n_r/2)-3|
|00005d20| 31 32 2c 34 30 2c 36 32 | 30 2c 31 32 30 3a e1 0d |12,40,62|0,120:..|
|00005d30| 1e 82 0e 20 e7 20 7a 3d | 31 32 37 20 8c 0d 1e 8c |... . z=|127 ....|
|00005d40| 1e 20 20 e7 20 69 24 3c | 3e 22 22 20 69 24 3d c0 |. . i$<|>"" i$=.|
|00005d50| 69 24 2c 28 a9 69 24 29 | 2d 31 29 0d 1e 96 06 20 |i$,(.i$)|-1).... |
|00005d60| cc 0d 1e a0 0c 20 20 69 | 24 2b 3d 5a 24 0d 1e aa |..... i|$+=Z$...|
|00005d70| 06 20 cd 0d 1e b4 04 0d | 1e be 3d 20 c8 99 22 57 |. ......|..= .."W|
|00005d80| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 32 |imp_SetC|olour",2|
|00005d90| 3a c8 93 20 c8 90 20 28 | 73 63 72 65 65 6e 5f 72 |:.. .. (|screen_r|
|00005da0| 2f 32 29 2d 33 30 30 2c | 39 36 2d 33 32 2c 36 30 |/2)-300,|96-32,60|
|00005db0| 30 2c 33 32 0d 1e c8 41 | 20 c8 99 22 57 69 6d 70 |0,32...A| .."Wimp|
|00005dc0| 5f 53 65 74 43 6f 6c 6f | 75 72 22 2c 31 31 3a ef |_SetColo|ur",11:.|
|00005dd0| 35 3a ec 20 28 73 63 72 | 65 65 6e 5f 72 2f 32 29 |5:. (scr|een_r/2)|
|00005de0| 2d 28 31 36 2a a9 69 24 | 29 2f 32 2c 39 36 3a f1 |-(16*.i$|)/2,96:.|
|00005df0| 69 24 3a ef 34 0d 1e d2 | 04 0d 1e dc 0b 20 e5 20 |i$:.4...|..... . |
|00005e00| 8d 54 72 5e 0d 1e e6 06 | 20 e1 0d 1e f0 10 20 f4 |.Tr^....| ..... .|
|00005e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 1e fa 15 20 dd |--------|--.... .|
|00005e20| f2 70 72 6f 63 65 73 73 | 5f 61 6e 73 77 65 72 0d |.process|_answer.|
|00005e30| 1f 04 15 20 e7 20 61 6e | 73 77 65 72 24 3d 6b 6f |... . an|swer$=ko|
|00005e40| 72 24 20 e1 0d 1f 0e 13 | 20 e7 20 61 6e 73 77 65 |r$ .....| . answe|
|00005e50| 72 24 3d 22 22 20 e1 0d | 1f 18 13 20 e7 20 c2 6b |r$="" ..|... . .k|
|00005e60| 6f 72 24 29 3d 22 53 22 | 20 8c 0d 1f 22 2d 20 20 |or$)="S"| ..."- |
|00005e70| e7 20 61 6e 73 77 65 72 | 24 3d c0 6b 6f 72 24 2c |. answer|$=.kor$,|
|00005e80| a9 6b 6f 72 24 2d 31 29 | 20 61 6e 73 77 65 72 24 |.kor$-1)| answer$|
|00005e90| 2b 3d 22 53 22 3a e1 0d | 1f 2c 06 20 cd 0d 1f 36 |+="S":..|.,. ...6|
|00005ea0| 04 0d 1f 40 16 20 e7 20 | c2 61 6e 73 77 65 72 24 |...@. . |.answer$|
|00005eb0| 29 3d 22 53 22 20 8c 0d | 1f 4a 40 20 20 e7 20 6b |)="S" ..|.J@ . k|
|00005ec0| 6f 72 24 3d c0 61 6e 73 | 77 65 72 24 2c a9 61 6e |or$=.ans|wer$,.an|
|00005ed0| 73 77 65 72 24 2d 31 29 | 20 61 6e 73 77 65 72 24 |swer$-1)| answer$|
|00005ee0| 3d c0 61 6e 73 77 65 72 | 24 2c a9 61 6e 73 77 65 |=.answer|$,.answe|
|00005ef0| 72 24 2d 31 29 3a e1 0d | 1f 54 06 20 cd 0d 1f 5e |r$-1):..|.T. ...^|
|00005f00| 04 0d 1f 68 06 20 e1 0d | 1f 72 10 20 f4 2d 2d 2d |...h. ..|.r. .---|
|00005f10| 2d 2d 2d 2d 2d 2d 2d 0d | 1f 7c 10 20 dd f2 70 72 |-------.|.|. ..pr|
|00005f20| 6f 63 65 73 73 5f 41 0d | 1f 86 0f 20 61 6e 73 77 |ocess_A.|... answ|
|00005f30| 65 72 24 3d 69 24 0d 1f | 90 15 20 e3 20 46 3d 31 |er$=i$..|.. . F=1|
|00005f40| 20 b8 20 a9 61 6e 73 77 | 65 72 24 0d 1f 9a 18 20 | . .answ|er$.... |
|00005f50| 20 6c 3d 97 28 c1 61 6e | 73 77 65 72 24 2c 46 2c | l=.(.an|swer$,F,|
|00005f60| 31 29 29 0d 1f a4 3f 20 | 20 e7 20 6c 3e 39 30 20 |1))...? | . l>90 |
|00005f70| 61 6e 73 77 65 72 24 3d | c0 61 6e 73 77 65 72 24 |answer$=|.answer$|
|00005f80| 2c 46 2d 31 29 2b bd 28 | 6c 2d 33 32 29 2b c2 61 |,F-1)+.(|l-32)+.a|
|00005f90| 6e 73 77 65 72 24 2c a9 | 61 6e 73 77 65 72 24 2d |nswer$,.|answer$-|
|00005fa0| 46 29 0d 1f ae 06 20 ed | 0d 1f b8 14 20 f2 70 72 |F).... .|.... .pr|
|00005fb0| 6f 63 65 73 73 5f 61 6e | 73 77 65 72 0d 1f c2 06 |ocess_an|swer....|
|00005fc0| 20 e1 0d 1f cc 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00005fd0| 2d 2d 0d 1f d6 0e 20 dd | f2 65 6e 64 5f 73 65 71 |--.... .|.end_seq|
|00005fe0| 0d 1f e0 3b 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |...; .."|Wimp_Set|
|00005ff0| 43 6f 6c 6f 75 72 22 2c | 32 3a c8 93 20 c8 90 20 |Colour",|2:.. .. |
|00006000| 28 73 63 72 65 65 6e 5f | 72 2f 32 29 2d 33 31 32 |(screen_|r/2)-312|
|00006010| 2c 34 30 2c 36 32 30 2c | 31 32 30 0d 1f ea 1c 20 |,40,620,|120.... |
|00006020| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|00006030| 72 22 2c 37 3a ef 35 0d | 1f f4 15 20 e7 20 77 68 |r",7:.5.|... . wh|
|00006040| 69 74 65 5f 77 6f 6e 25 | 3d b9 20 8c 0d 1f f5 31 |ite_won%|=. ....1|
|00006050| 20 20 ec 20 28 73 63 72 | 65 65 6e 5f 72 2f 32 29 | . (scr|een_r/2)|
|00006060| 2d 31 33 36 2c 31 33 36 | 3a f1 22 57 68 69 74 65 |-136,136|:."White|
|00006070| 20 70 6c 61 79 65 72 20 | 77 69 6e 73 22 0d 1f f9 | player |wins"...|
|00006080| 06 20 cc 0d 1f fa 2e 20 | 20 ec 20 28 73 63 72 65 |. ..... | . (scre|
|00006090| 65 6e 5f 72 2f 32 29 2d | 31 32 30 2c 31 33 36 3a |en_r/2)-|120,136:|
|000060a0| f1 22 42 6c 75 65 20 74 | 65 61 6d 20 77 69 6e 73 |."Blue t|eam wins|
|000060b0| 22 0d 1f fd 06 20 cd 0d | 20 05 1a 20 e3 20 55 55 |".... ..| .. . UU|
|000060c0| 3d 31 20 b8 20 35 3a e3 | 20 50 50 3d 31 20 b8 20 |=1 . 5:.| PP=1 . |
|000060d0| 34 0d 20 08 22 20 6c 3d | 30 3a f5 3a 6c 2b 3d 31 |4. ." l=|0:.:l+=1|
|000060e0| 3a fd 20 41 72 28 6c 29 | 3d 4c 65 74 28 55 55 2c |:. Ar(l)|=Let(UU,|
|000060f0| 50 50 29 0d 20 12 21 20 | e7 20 41 72 32 28 6c 29 |PP). .! |. Ar2(l)|
|00006100| 3e 30 20 f2 66 6c 61 73 | 68 32 20 8b 20 f2 66 6c |>0 .flas|h2 . .fl|
|00006110| 61 73 68 33 0d 20 1c 08 | 20 ed 3a ed 0d 20 26 04 |ash3. ..| .:.. &.|
|00006120| 0d 20 30 19 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |. 0. .."|Wimp_Set|
|00006130| 43 6f 6c 6f 75 72 22 2c | 37 0d 20 3a 3a 20 ec 20 |Colour",|7. :: . |
|00006140| 28 73 63 72 65 65 6e 5f | 72 2f 32 29 2d 32 30 30 |(screen_|r/2)-200|
|00006150| 2c 39 36 3a f1 22 50 72 | 65 73 73 20 61 6e 79 20 |,96:."Pr|ess any |
|00006160| 6b 65 79 20 74 6f 20 63 | 6f 6e 74 69 6e 75 65 22 |key to c|ontinue"|
|00006170| 3a ef 34 0d 20 44 09 20 | 5a 24 3d be 0d 20 4e 3b |:.4. D. |Z$=.. N;|
|00006180| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|00006190| 75 72 22 2c 32 3a c8 93 | 20 c8 90 20 28 73 63 72 |ur",2:..| .. (scr|
|000061a0| 65 65 6e 5f 72 2f 32 29 | 2d 33 31 32 2c 34 30 2c |een_r/2)|-312,40,|
|000061b0| 36 32 30 2c 31 32 30 0d | 20 58 06 20 e1 0d 20 62 |620,120.| X. .. b|
|000061c0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 20 6c |. .-----|-----. l|
|000061d0| 0d 20 dd f2 66 6c 61 73 | 68 32 0d 20 76 2a 20 78 |. ..flas|h2. v* x|
|000061e0| 71 3d 78 73 74 2b 28 73 | 2a 71 72 2f 32 29 2b 28 |q=xst+(s|*qr/2)+(|
|000061f0| 28 55 55 2d 31 29 2a 28 | 28 73 2a 71 72 29 2b 73 |(UU-1)*(|(s*qr)+s|
|00006200| 2f 32 29 29 0d 20 80 28 | 20 79 71 3d 79 73 74 2b |/2)). .(| yq=yst+|
|00006210| 28 73 2a 30 2e 38 36 36 | 29 2b 28 50 50 2d 31 29 |(s*0.866|)+(PP-1)|
|00006220| 2a 28 32 2a 73 2a 30 2e | 38 36 36 29 0d 20 8a 21 |*(2*s*0.|866). .!|
|00006230| 20 e7 20 28 55 55 2d 31 | 29 20 83 20 32 3d 31 20 | . (UU-1|) . 2=1 |
|00006240| 79 71 2b 3d 28 73 2a 30 | 2e 38 36 36 29 0d 20 94 |yq+=(s*0|.866). .|
|00006250| 3d 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |= .."Wim|p_SetCol|
|00006260| 6f 75 72 22 2c 39 3a c8 | 8f 20 c8 90 20 78 71 2c |our",9:.|. .. xq,|
|00006270| 79 71 2c 33 32 3a c8 99 | 22 57 69 6d 70 5f 53 65 |yq,32:..|"Wimp_Se|
|00006280| 74 43 6f 6c 6f 75 72 22 | 2c 36 0d 20 9e 21 20 61 |tColour"|,6. .! a|
|00006290| 25 3d b0 78 71 2c 79 71 | 29 3a e6 20 31 32 38 2b |%=.xq,yq|):. 128+|
|000062a0| 61 25 3a c8 90 20 78 71 | 2c 79 71 0d 20 a8 12 20 |a%:.. xq|,yq. .. |
|000062b0| e3 20 52 3d 31 20 b8 20 | 38 30 30 3a ed 0d 20 b2 |. R=1 . |800:.. .|
|000062c0| 37 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |7 .."Wim|p_SetCol|
|000062d0| 6f 75 72 22 2c 31 34 3a | 61 25 3d b0 78 71 2c 79 |our",14:|a%=.xq,y|
|000062e0| 71 29 3a e6 20 31 32 38 | 2b 61 25 3a c8 90 20 78 |q):. 128|+a%:.. x|
|000062f0| 71 2c 79 71 0d 20 bc 12 | 20 e3 20 52 3d 31 20 b8 |q,yq. ..| . R=1 .|
|00006300| 20 38 30 30 3a ed 0d 20 | c6 06 20 e1 0d 20 d0 10 | 800:.. |.. .. ..|
|00006310| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 20 da 0d | .------|----. ..|
|00006320| 20 dd f2 66 6c 61 73 68 | 33 0d 20 e4 2a 20 78 71 | ..flash|3. .* xq|
|00006330| 3d 78 73 74 2b 28 73 2a | 71 72 2f 32 29 2b 28 28 |=xst+(s*|qr/2)+((|
|00006340| 55 55 2d 31 29 2a 28 28 | 73 2a 71 72 29 2b 73 2f |UU-1)*((|s*qr)+s/|
|00006350| 32 29 29 0d 20 ee 28 20 | 79 71 3d 79 73 74 2b 28 |2)). .( |yq=yst+(|
|00006360| 73 2a 30 2e 38 36 36 29 | 2b 28 50 50 2d 31 29 2a |s*0.866)|+(PP-1)*|
|00006370| 28 32 2a 73 2a 30 2e 38 | 36 36 29 0d 20 f8 21 20 |(2*s*0.8|66). .! |
|00006380| e7 20 28 55 55 2d 31 29 | 20 83 20 32 3d 31 20 79 |. (UU-1)| . 2=1 y|
|00006390| 71 2b 3d 28 73 2a 30 2e | 38 36 36 29 0d 21 02 24 |q+=(s*0.|866).!.$|
|000063a0| 20 62 25 3d b0 78 71 2c | 79 71 29 3a c8 99 22 57 | b%=.xq,|yq):.."W|
|000063b0| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 36 |imp_SetC|olour",6|
|000063c0| 0d 21 0c 21 20 61 25 3d | b0 78 71 2c 79 71 29 3a |.!.! a%=|.xq,yq):|
|000063d0| e6 20 31 32 38 2b 61 25 | 3a c8 90 20 78 71 2c 79 |. 128+a%|:.. xq,y|
|000063e0| 71 0d 21 16 12 20 e3 20 | 52 3d 31 20 b8 20 38 30 |q.!.. . |R=1 . 80|
|000063f0| 30 3a ed 0d 21 20 37 20 | c8 99 22 57 69 6d 70 5f |0:..! 7 |.."Wimp_|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.